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