Кто знает 20 . написать(program; var; begin; if; - вопрос №827355220 от barmeb11 10.08.2021 15:09

Question

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

barmeb11 · Answer

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