Question

1. с датчика случайных чисел на интервале от 250 до 700 получить целочисленный массив, состоящий из 100 элементов. 2. дан одномерный целочисленный массив. из элементов массива, равных 10, сформировать массив b., а из элементов меньших 5, сформировать массив c.

Answer 1

1) program n_1;
var a:array[1..100] of integer;
i, n:integer;
begin
writeln('Введите кол-во элементов');
readln(n);
for i:=1 to n do
begin
a[i]:=random(450)+250;
writeln(a[i],' ');
end;
end.