Пользователь вводит число, если оно четно, то вывести "да", если оно нечетно, вывести "нет" . Напишите блок-схему и программу на языке Паскаль . Пожалуйста

решение новое писать не буду,так как вроде схема хорошая и код правильный. вот Паскаль Var x,y:integer; Begin Writeln('Введите число'); Readln(x); If x mod 2 = 0 then writeln('Да') else writeln('нет'); End.

давно не работала в Паскаль и уже забыла, что и как писать. Если что могу написать на С++а блок схема выглядит так 2 изображение - так примерно должна выглядеть программа, но возможны какие-то неточности, так как повторюсь, плохо знаю язык. надеюсь, чем-нибудь помогла