Ответы
Ответ дал:
0
var
i:integer;
s:real;
begin
for i:=1 to 15 do
s:=s+((i-1)/2);
writeln('Resultat: ', s)
end.
i:integer;
s:real;
begin
for i:=1 to 15 do
s:=s+((i-1)/2);
writeln('Resultat: ', s)
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
10 лет назад
10 лет назад