Найти все элементы массива целых чисел, удовлетворяющих условию: остаток от деления на 5 равен 3
Найти все элементы массива целых чисел, удовлетворяющих условию: остаток от деления на 5 равен 3
Гость
Ответ(ы) на вопрос:
Гость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.
Не нашли ответ?
Похожие вопросы