Информатика, вопрос задал ilialie54 , 9 лет назад

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

Ответы на вопрос

Ответил Gleb1Kosyrev
0
//Форматировать код? Нет, автор задания не слышал
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.

Ответил ilialie54
0
благодарю
Ответил ilialie54
0
очень сильно я уж полюбил этот сайт
Новые вопросы