Составьте программку, которая формирует массив из 10 случайных чисел от -25

Составьте программу, которая сформировывает массив из 10 случайных чисел от -25 до +25, и подсчитывает количество положительных частей ( Только не надобно с решебы)

Задать свой вопрос
1 ответ
Var a: array [1..10] of integer;var c: integer;begin  for var i:= 1 to 10 do a[i]:=25-random(50)+1;  for var i:= 1 to 10 do begin if(a[i] gt; 0) then c:=c+1; end;  writeln('Положительных чисел: ',c);end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт