Jhhjjhgk
4 год назад
По информатике , составить программу для нахождения суммы 4 трёх значенных чисел
ОТВЕТЫ
Stoyanka
Oct 24, 2020
var
i,sum,tmp:integer;
begin
for i:= 1 to 4 do
begin
read(tmp);
sum:= sum+tmp;
end;
Writeln(sum);
end.
i,sum,tmp:integer;
begin
for i:= 1 to 4 do
begin
read(tmp);
sum:= sum+tmp;
end;
Writeln(sum);
end.
94
Смежные вопросы: