Лиодор
4 год назад
Написать программу для нахождения суммы чисел от одной десятой до 1. (Паскаль)
ОТВЕТЫ
Yulian
Oct 24, 2020
var
i:integer;
s:real;
begin
s:=0;
for i:=1 to 10 do s:=s+i/10;
Writeln(s)
end.
5.5
i:integer;
s:real;
begin
s:=0;
for i:=1 to 10 do s:=s+i/10;
Writeln(s)
end.
5.5
812
Смежные вопросы: