vari:integer;beginfor i := 10 to 99 doif (((2*i) mod 10) = 8) and (((3*i) mod 10) = 4) thenwrite(i,' ');end.
P.s Таких чисел нет