Составьте программу, формирующую одномерный массив, элементы которого равны кубу своего индекса.

Составьте программу, формирующую одномерный массив, элементы которого равны кубу своего индекса.
Гость
Ответ(ы) на вопрос:
Гость
const n=10; var a:array[1..n] of integer; i:integer; begin for i:=1 to n do a[i]:=i*i*i; for i:=1 to n do write(a[i],' '); writeln; end. Результат: 1 8 27 64 125 216 343 512 729 1000 
Гость
Var A:array[1..33] of integer; i:integer; Begin For i:= 1 to 33 do     Begin     A[i]:=i*i*i;     Write(A[i],' ')     End; End.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы