Составить программу на суммирование элементов массива. Произвести ввод и отладку программы, проанализировать полученный результат.
10-11 класс
|
uses crt;
const N=5;
var a:array [1..N] of integer;
x,sum:integer;
begin
sum:=0;
for x:=1 to N do
begin
write('a[',x,']:');
readln(a[x]);
sum:=sum+a[x];
end;
writeln('Sum=',sum);
end.
---
Вариант работы программы на скрине во вложении
Другие вопросы из категории
черно-белого изображение 120×150. Определить размер документа?
быть простая,так как я учусь в соц.гуме)
Читайте также
массив целых чисел из 10 элементов заполнить случайным образом. упорядочить массив по возрастанию. подсчитать количество и произведение элементов массива, больших 20 и меньших 50, вывести полученный результат
элементами организовать путем ввода с клавиатуры.В одномерном массиве из N чисел вывести на экран отрицательные элементы и сообщите об их количестве.Пожалуйста,срочно надо.
массив из N целых чисел и выводит на экран номера отрицательных элементов и сами эти элементы. Протестировать программу для следующих массивов:
а) 3 5 -2 0 -6 -8 1
б) -1 -2 -3 0 -1 2 3
массивы должны вводися вручную а не рандомно.
чисел найти количество элементов равных 3. 3)В массиве из 8 целых найти номер массива с наибольшим значением. 4)В массиве из 12 целых чисел найти количество и сумму элементов, расположенных до максимального элемента. 5)Для массива из 15 вещественных подсчитать количество элементов массива меньших суммы первого и последнего элементов массива.
вывести сумму элементов массива которые кратны 7 и оканчиваются на 5 .Гарантируется,что в исходном массиве есть хотя бы один такой элемент.
НА ЯЗЫКЕ ПАСКАЛЬ!!!!