Вычислите сумму 7 натуральных чисел, вводимых с клавиатуры .Наберите в среде Pascal ABC , заменив многоточия на необходимые команды. program v2; var s,n,i:integer; begin s:=........; for i:=..... to ..... do begin writeln('вв...
Вычислите сумму 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.
Не нашли ответ?
Похожие вопросы