Предмет: Информатика,
автор: ученик1605
помогите решить очень это инфа
Приложения:
![](https://files.topotvet.com/i/10d/10dcbee9946c3f828b500e6ca2013662.jpg)
Ответы
Автор ответа:
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.
Begin
A:=1;
For N:= 0 to 9 do
Begin
A:=A+N;
WriteLn(A,' ',A*A,' ',A*A*A)
End;
End.
Похожие вопросы
Предмет: Английский язык,
автор: shturmkolya228
Предмет: Русский язык,
автор: Аноним
Предмет: Математика,
автор: zyoga76
Предмет: История,
автор: 25nipugo
Предмет: Геометрия,
автор: соня2277