Дан фрагмент программы , допишите раздел объявления переменных. begin. read (k) ; c: =k mod 2; if c=o then v: =true else v: =false; if v then write (‘четное’) else write (‘нечетное’); end.

abroe abroe    2   25.09.2019 17:50    2

Ответы
alina1934 alina1934  08.10.2020 19:00
Var k,c,o: Integer;
V: Boolean;
Begin
Read(K);
C:=K mod 2;
If C=o then V:=true else V:=false;
If V then Write ('Четное') else write ('Нечетное');
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика