Question

дан одномерный массив из 15 элементов, заполняется случайным образом вывести все элементы меньше некоторого a

Answer 1

program arrd;uses crt;var i,a : integer; arr : array [1..15] of integer;begin randomize; writeln('Write a: '); read(a); writeln('-----------------------------'); for i:=1 to 15 do begin arr[i] := random(100); if arr[i] < a then writeln(arr[i]); end; writeln('-----------------------------'); readkey;end.

5c7033396df1fb0c93f4aac01433da96.pas

Answer 2

можешь еще детализацию сделать?

Answer 3

По конкретнее пожалуйста