• Главная
• Вопросы и ответы
• Напечатать числа следующим образом В ПАСКАЛЬ : 10 10.4 11 11.4 … 25 25.4

Напечатать числа следующим образом В ПАСКАЛЬ : 10 10.4 11 11.4 … 25 25.4

Var i:byte;
Begin 
for i:=10 to 25 do 
begin   
write(i,’ ‘);   
writeln(i,’.4′); 
end;
End.