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

своего индекса.

Question

Информатика

Порфир

18 мая, 22:29

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

своего индекса.

+2

Ответы (2)

Знаете ответ?

Слава · Answer 1

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

Альба · Answer 2

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.

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

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

своего индекса.