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

Question

Информатика

Георгич

17 марта, 17:49

Найти все элементы массива целых чисел, удовлетворяющих условию: остаток от деления на 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.