
Ghoth
5 год назад
Используя цикл For вычислить сумму 7-ми произвольных чисел, введенных с клавиатуры.Составить для паскаль.Пожалуйста посчитайте пожалуйста.Буду очень благодарна
ОТВЕТЫ

Stanka
Oct 24, 2020
Program DZ;
var i: longint;
x,s:real;
begin
s:=0;
for i:=1 to 7 do
begin
read (x);
s:=s+x;
end;
write (s);
end.
var i: longint;
x,s:real;
begin
s:=0;
for i:=1 to 7 do
begin
read (x);
s:=s+x;
end;
write (s);
end.
445
Смежные вопросы: