Найти все элементы массива целых чисел, удовлетворяющих условию: остаток от деления на 5 равен 3

Question

Информатика

Филарет

23 июля, 14:27

Найти все элементы массива целых чисел, удовлетворяющих условию: остаток от деления на 5 равен 3

+3

Ответы (1)

Знаете ответ?

Валерьич · Answer 1

Program gt;

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

begin

readln (n) ;

for i:=1 to n do

read (a[i]) ;

for i:=1 to n do

if (a[i] mod 5=3) then writeln (a[i]) ;

end.