дан одномерный массив а размер массива 10 найти сумму всех элементов массива
Ответы на вопрос
Ответил Опечатка
0
var i,sum:integer; a:array[1..10] of integer;
begin;
for i:=1 to 10 do readln(a[i]); next i;
sum:=0;
for i:=1 to 10 do sum:=sum+a[i]; next i;
writeln('Сумма элементов = ',sum);
end.
begin;
for i:=1 to 10 do readln(a[i]); next i;
sum:=0;
for i:=1 to 10 do sum:=sum+a[i]; next i;
writeln('Сумма элементов = ',sum);
end.
Ответил Опечатка
0
ну да, я сначала без него написала, потом решила, что забыла, и только потом сообразила, что это бейсик :D уже каша в голове от них
Новые вопросы
Информатика,
2 года назад
Математика,
10 лет назад
Литература,
10 лет назад
Обществознание,
10 лет назад