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

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