По программированию заполнить массив случайным образом - вопрос №8492387 от isaevavika 27.06.2022 12:22

Question

Информатика: По программированию заполнить массив случайным образом и вывести на экран только элементы остаток от деления на 3 которых равен 1

isaevavika · Answer

program HelloWorld;

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

var i: integer;

begin

for i:=1 to 100 do

n[i] := random(1000);

for i:=1 to 100 do

if n[i] mod 3 = 1 then writeln(n[i]);

end;