Составьте алгоритм и блок-схему программы, которая проверяет, является ли чётным введённое пользователем целое число) Очень прошу, помогиите!

Ya znayu kak sdelat na pascalabc

vot smotri vse chotniye chisla delyatsya na 2 togda esli dannoye chislo budet naselo delitsya na 2 to ono budet chetnim ili je

var n:integer;

begin

read (n) ;

if (n mod 2 = 0) then write ('yavlyaetsya') ;

end.

zdes mod 2 oznochaet chto chislo kratno 2