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

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