Кто знает 20 . написать(program; var; begin; if; - вопрос №827265020 от Matannoob 27.04.2020 04:56

Question

Информатика: Кто знает 20 . написать(program; var; begin; if; then; else; end; ) . оформить: 1) компьютер спрашивает: «сколько будет 2+2» 2) пользователь отвечает 3) если ответ верный, то компьютер говорит: «молодец» 4) иначе компьютер говорит: «иди, учись»

Matannoob · Answer

Program z1;uses crt;var a:integer;beginwriteln( сколько будет 2+2 );readln(a);if a:=4 do write ( молодец )else ( иди учись )end....