Регистрация
Ксюша0071111
26.08.2020 02:01
Информатика
Есть ответ 👍

Дан одномерный массив из 25 целых случайных чисел из диапазона [-100; 50] решите .

290
345
Посмотреть ответы 2

Ответы на вопрос:

kakniet
kakniet
4,5(81 оценок)

program helloworld;

var n: array [1..25] of integer;

var i: smallint;

 

begin

 

      for i : = 1 to 25 do

              n[i] : = -100 + random(150);

 

         

      for i : = 1 to 25 do

          if n[i] > 0 then writeln(n[i]);

 

end.

MrX01
MrX01
4,6(38 оценок)
16*64*64*1024/8*1024*1024=8 верный ответ под номером 2

Популярно: Информатика