Question

Написать программу на языке программирования Паскаль. Если введенное с клавиатуры число оканчивается на 4 и делится на 2, то вывести «YES» иначе «NO». Оформить задачу.

Answer 1

Ответ:

Объяснение:

program yesno;

var n:integer;

begin

 Write('Введите натуральное число ');

 Read(n);

 If (n mod 10=4) and (n mod 2=0) then

   begin

     write('YES');

     Readln;

   end  

   else

     begin

       write('NO');

       Readln;

     end;

 Readln;

End.