3. дана программа на паскале для определения чётности числа: var x: integer; begin write ('введите x: '); readln (x); if x mod 2 = 0 then writeln ('это четное число') else writeln ('это нечетное число'); end. нарисовать блок- схему алгоритма по данной программе.