АленаКонева

21.12.2020 13:20 •  Информатика

Составить схему к программе
program имя ;
uses crt;
var x : integer ;
begin
write ln (‘ введите число’);
read (x)
if mod 2=0 them write (‘четное’)
else write (‘нечетное’)
end.
!