Вычеслить все квадраты двухзначных чисел не привышаюших 100

Вычеслить все квадраты двухзначных чисел не привышаюших 100
Гость
Ответ(ы) на вопрос:
Гость
program kvadrat; var i : integer; begin for i:= 10 to 100 do writeln ( i:2, i*i : 5); readln; end. 
Не нашли ответ?
Ответить на вопрос
Похожие вопросы