Напишите программу печатающую номера элементов массива больших 30 (Паскаль)

Question

Информатика

Викентий

22 ноября, 01:15

Напишите программу печатающую номера элементов массива больших 30 (Паскаль)

+1

Ответы (1)

Знаете ответ на вопрос?

Галуха · Answer 1

Program example;

var arr: array[1 ... 50] of Integer;

i: Integer;

begin

randomize;

for i:=1 to 50 do

arr[i]: = random (100) ;

for i: = 1 to 50 do

begin

if arr[i] > 30 then

writeln ('Array[', i, '] = ', arr[i]) ;

end;

end.