Вывести квадраты чисел от 30 до 10

Ответы

Ответ дал: Аноним
0
var i :integer;
begin 
for i := 30 downto 10 do 
writeln(sqr(i));
readln;
end.
Ответ дал: Аноним
0
longint=)) Весёлый тип, для такой задачки=D
Ответ дал: Аноним
0
прости ..
Ответ дал: Аноним
0
За что?=))
Ответ дал: Аноним
0
ошиблась )
Ответ дал: Аноним
0
Ну, вообще ошибки нет=)
Похожие вопросы