Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
Привет
Объяснение:
program kvadrat;
var i : integer;
begin
for i: = 10 to 100 do
writeln ( i: 2, i*i : 5);
readln;
end.
программа на паскале:
program xxx; var a, b: real; begin writeln('введите количество миль'); readln(a); b: = a*1.6; writeln('кол-во киллометров - ',b)end.
Популярные вопросы