Question

Дан целочисленный массив размера 8. Вывести все содержащиеся в данном массиве числа в диапазоне от 50 до 70.
Срочно(35 баллов)

Answer 1

Программа:

Pascal:

var arr: array[1..8] of integer;

begin

for var i := 1 to 8 do begin

arr[i] := random(50, 70);

write(arr[i], ' ');

end;

end.