Кто знает 20 . написать(program; var; begin; - вопрос №2018272875 от Lezgin228 12.04.2020 14:42

Question

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

Lezgin228 · Answer

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