Вычислите сумму 7 натуральных чисел, вводимых с клавиатуры .Наберите в среде Pascal ABC ,...

0 голосов
50 просмотров

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


Информатика (24 баллов) | 50 просмотров
0

помогите пожалуйста очень надо

Дан 1 ответ
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.

(38.6k баллов)
0

благодарю

0

очень сильно я уж полюбил этот сайт