Дано N-произвольных чисел найти их сумму.
5-9 класс
|
var
n, i: integer;
a, s: real; //a - вводимое число, s - сумма чисел
begin
s:= 0; //Обнуляем значение суммы
writeln('Введите N');
readln(N); //Вводим N
for i:= 1 to N do {N раз вводим число и каждый раз прибавляем введенное число к значению суммы}
begin
writeln('Введите число');
readln(a);
s:= s + a;
end;
writeln('Сумма введенных чисел равна: ', s); //Выводим сумму
end.
Если все правильно, отметь решение как лучшее)
Другие вопросы из категории
Определите значение переменной z
после выполнения следующего фрагмента программы:
m:=13;
n:=21;
n:=2*m-n;
if m<=n then
p:=m+n
else
p:=4-m*n;
В салоне небольшого самолета летят 42 пассажира.Некоторые из них москвичи,остальные-иногородние.Среди москвичей 9 мужчин.Некоторые из пассажиров артисты,но ни одна из иногородних женщин не является артисткой. Всего иногородних мужчин 18.Изних 13-не артисты,Среди пассажиров,не являющихся артистами,16 мужчин и 11 женщин.6 москвичей не артисты.Разберитесь,пожалуйста,с пассажирами:кто есть кто?
Читайте также
2. Дан массив целых чисел,найти количество отрицательных элементов массива.
3. Дан массив целых чисел,найти количество чётных чисел в массиве.
результаты.:
· Если первое из них отрицательно, а второе вдвое больше третьего, то выведите среднее арифметическое всех четырех чисел.
· Если произведение этих чисел больше их суммы, то выведите эти сумму и произведение.
· Если выполняются одновременно два перечисленных выше условия, то выведите среднее арифметическое этих чисел, их произведение и сумму
· Иначе, выведите удвоенные значения этих чисел
2.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами от 0 до 50. Заменить все четные элементы на их квадраты, а нечетные удвоить.
2)Дан массив целых чисел.Найти сумму четных положительных чисел, стоящих на нечетных местах и количество отрицательных элементов, стоящих на четных местах.
3)дан массив целых чисел.найти сумму четных и положительных элементов, расположенных до первого отрицательного элемента.Примечание:при вводе необходимо учесть, что первый элемент не может быть отрицательным.
знаки и затем найти сумму Помогите алгоритм составить в Паскале .