Предмет: Информатика, автор: ученик1605

помогите решить очень это инфа

Приложения:

Ответы

Автор ответа: Аноним
0
Var A,N:integer;
Begin
A:=1;
For N:= 0 to 9 do
    Begin
    A:=A+N;
    WriteLn(A,' ',A*A,' ',A*A*A)
    End;
End.
Похожие вопросы
Предмет: Математика, автор: zyoga76
Предмет: Геометрия, автор: соня2277