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

Составьте программу, задающую переменный массив D из 9 целых чисел, заполненный кубами индексов элементов массива и выводящую номер элемента и его значение в строчку через запятую. Pascal ABC


yxmezg: program n
;var i: integer;
C: array[1..9] of integer;
begin
for i := 1 to 9 do C[i] := random(0,9);
writeln(C);
end.

Ответы

Автор ответа: yxmezg
0

program n

;var i: integer;

D: array[1..9] of integer;

begin

for i := 1 to 9 do D[i] := random(0,9);

writeln(D);

end.

Похожие вопросы
Предмет: Английский язык, автор: nastia195