Опубликовано 12.06.2017 по предмету Информатика от Гость >> <<

Вычислите сумму 7 натуральных чисел, вводимых с клавиатуры .Наберите в среде
Pascal ABC , заменив многоточия на необходимые команды.
program v2;
var s,n,i:integer;
begin s:=........;
for i:=..... to ..... do begin writeln(введите число);
................(n);
s:=s+........;
end;
writeln(сумма равна,.....);
end.

Ответ оставил Гость

//Форматировать код? Нет, автор задания не слышал
var s,n,i:integer; 
begin
s:=0;
for i:=1 to 7 do
begin
writeln(введите число);
readln(n);
s:=s+n; 
end;
writeln(сумма равна,s);
end.