) Найти и выдать на печать все трехзначные числа, которые при умножении на 2 заканчиваются цифрой 8, а при умножении на 3 - цифрой 4. При отсутствии таких чисел - сообщить об этом
задача на решении в паскаль

странно, программа все равно не запустилась

У меня всё работает.

не правильно использован оператор

все заработала, спасибо

Если тебе не сложно, отметь, пожалуйста, решение как лучший ответ.

var    i, k: integer;begini:= 100;k:= 0;  while i < 1000 do beginif (i * 2 mod 10 = 8) and (i * 3 mod 10 = 4) then write(i, ' ') else k:= k + 1;i:= i + 1;end;if k = 900 then writeln('Таких чисел не существует!');end.