Ответы
Ответ дал:
0
Var i:byte;
Begin
for i:=10 to 25 do
begin
write(i,' ');
writeln(i,'.4');
end;
End.
Begin
for i:=10 to 25 do
begin
write(i,' ');
writeln(i,'.4');
end;
End.
Вас заинтересует
2 года назад
7 лет назад
9 лет назад