сервис вопросов и ответовНужна программа в Паскале. С клавиатуры вводятся значения переменной x. Найдите сумму только а=положительных элементов и их число.
10-11 класс|
|
Kiruhan2013
18 марта 2015 г., 3:44:40 (9 лет назад)
Aliyushka82
18 марта 2015 г., 4:16:45 (9 лет назад)
program test;
uses crt;
var x,n,sum,i:integer;
begin
clrscr;
write('Input x ');readln(x);
for i:=1 to x do
begin
write('Input number',i,' '); readln(n);
if n>0 then sum:=sum+n;
end;
writeln(sum);
readln;
end.
LizZzonkaA
18 марта 2015 г., 9:24:03 (9 лет назад)
Комментарий удален
Anutaaaaaafhhnvfy
18 марта 2015 г., 14:18:03 (9 лет назад)
да, задает пользователь
Ответить
Другие вопросы из категории
Что будет выведено на экран в результате выполнения следующих действий?
K:=0;
For A:=1 to 5 do
Begin
K:=K+A;
Write(K);
End.
Пожалуйста, добавьте программу, которая заставит двигаться глаза:
uses graphABC;
begin
setwindowsize(500,400);
setpencolor(clwhite);
setbrushcolor(clbrown);
ellipse(60,40,100,90);
ellipse(160,40,200,90);
circle(130,110,70);
ellipse(90,110,170,160);
setbrushcolor(clwhite);
setpencolor(clblack);
circle(105,80,15);
circle(155,80,15);
setbrushcolor(clblack);
ellipse(100,75,110,93);
ellipse(150,75,160,93);
ellipse(150,75,160,93);
setpencolor(clwhite);
setbrushcolor(clbrown);
floodfill(60,40,cllightblue);
end.
Читайте также
написать программу для паскаль.С клавиатуры вводятся целые числа.Признаком конца ввода является 0.Изменить знак отрицательных чисел на
противоположный.Результаты вывести на экран.
1.тема циклы со сщетчиком.Написать программу в паскале для ввода с клавиатуры 15 чисел и вывода номеров отрицательных элементов.
2.написать программу в паскале
f(x)=2(sin*sin)x+1
Здравствуйте! Позарез нужна программа в Паскале, вот условие:
"Разработать программу,
которая осуществляет в текстовом файле поиск заданных слов. Слова
последовательно вводятся с клавиатуры. Для каждого слова должно определяться
количество вхождений и номера строк текста. Если указанное слово в файле
отсутствует, то программа должна выводить соответствующее сообщение."
И если можно, то и блок-схему.
Заранее спасибо!
Помогите пожалуйста, нужно сделать в паскале, в экселе, и блок-схему!
(задание номер 5 на фото)
Дан одномерный массив А размерностью 16. Определить максимальное значение среди нечетных элементов массива, и минимальное среди четных элементов массива. Получить сумму максимального и минимального значений элементов массива и преобразовать данный массив по принципу из значений нечетных элементов вычесть сумму, а к четным элементам прибавить сумму. Все первоначальные элементы массива вводятся с клавиатуры.
Ребята, девчата, тут такое затруднение. Нужна программа в паскале, только в паскале.
Условие:
Напишите программу которая вычисляет среднее арифметическое элементов таблицы А(3*8) . Программа по двумерным массивам.
Вы находитесь на странице вопроса "Нужна программа в Паскале. С клавиатуры вводятся значения переменной x. Найдите сумму только а=положительных элементов и их число.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.