Регистрация
Войти
Стать экспертом Правила
Информатика

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

ОТВЕТЫ
program z1;
uses crt;

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


618
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам