Mod - это остаток от числа. Значит, 9 mod 2 = 1
1х25=25кадров в секунду
1мин.=60сек.
25х60=150кадров в минуту
1,5часа=90 мин.
90х150=13500мб.
Нажми на файл правой мышкой и найди и нажми на свойства
var
a:byte;
begin
write('Введите число '); readln(a);
if (a div 10 = 4) or (a mod 10 = 4) then
writeln('В число входит цифра 4')
else
writeln('цифра 4 в число не входит');
end.