Пожалуйста посчитайте пожалуйста!!Программа в Паскаль.1)Ввести с клавиатуры натуральное число N.Оканчивается ли это число на 8?Примеры:518-Да,10-Нет.2)К Пете на день рождения пришли К друзей с коробкой конфет.В коробке 25 конфет.Хватит ли конфет,чтобы всем дать по две конфеты?Примеры:5-Да,12-Нет.3)У Пети S рублей.Сможет ли он купить 5 тетрадей,если одна тетрадь стоит M рублей?Примеры:305-Да,105-Нет.

Var
   N,K,S,M: integer;
begin
{1-я задача}
writeln("Введите натуральное число");
readln(N);
if N mod 10 = 8 then
  writeln("Число оканчивается на 8")
  else writeln("Число не оканчивается на 8");
{2-я задача}
writeln("Введите количество гостей пришедших к Пете");
readln(K);
if (25-K*2)>0 then writeln("Конфет хватит")
   else writeln("Конфет недостаточно");
{3-я задача}
writeln("Введите количество рублей у Пети, а затем цену одной тетради");
readln(S);
readln(M);
if (S-M*5)>=0 then writeln("Петя сможет купить пять тетрадей");
  else
 writeln("Пяти тетрадей не купить");
end.