Решите информатику. : написать программу, в которой описать массив из 5 целых чисел, ввести элементы массива с клавиатуры, вычислить сумму всех элементов массива и вывести её на экран.
zoggvik13ouid1r
3
13.03.2019 19:25
1
Другие вопросы по теме Информатика
ExploreYT
30.05.2020 18:02
Анонимка00
04.03.2021 09:44
alibekovberkut
18.02.2021 10:58
Blumster12
18.02.2021 10:58
prohorowanyura
21.06.2019 04:50
qwertyzored
21.06.2019 04:50
дан55566
07.02.2022 08:11
Антонио789176
07.02.2022 08:11
ilyazavrik
07.02.2022 08:11
Gumashova
07.02.2022 08:11
Популярные вопросы
- Чем примечателен памятник троице сергеева лавры...
3 - Al4c3= ch4= ch3cl= c2h6= co2= co= ch4...
1 - Какие системы органов у амебы и их функции?...
1 - Сочинение рассуждения на тему что такое родина...
2 - Решите кроссворд. по вертикали. 1)часть прямой.2). фигура.3) действие.6)...
3 - Усложнение кровеносной системы соответствует эволюции хордовых в...
2 - Почему зелёная эвглена относится к промежуточному положению между...
3 - Докажите ,что при любом n³ + 3n³+6n + 8 является составным...
2 - Укажите,что выражает данное предложение: не забудь купить хлеб.(сообщение...
3 - Мне напишите: все нечетные числа до 20,и четные числа от 10 до 30....
3
var
ar: array[1..5]of integer;
i, sum: integer;
begin
sum := 0;
for i := 1 to 5 do
begin
read(ar[i]);
sum := sum + ar[i];
end;
write(sum);
end.