Написать программку, которая выводит на экран вопрос:"В каком году появились 1-ые

Написать программку, которая выводит на экран вопрос:quot;В каком году появились первые ЭВМ?quot; и ждёт ответа.В зависимости от ответа, программа извещает:quot;Вы правы!quot; либо quot;Вы ошиблись, прочитайте свою рабочую тетрадь ещё раз!quot;

Задать свой вопрос
1 ответ

Var year: integer;
begin
//запрос нужных характеристик
Writeln(В каком году появились 1-ые ЭВМ?);
Readln(year);
//проверка правильности введённого ответа
if year=1946 then
Writeln(Вы правы!)
else
Writeln(Вы ошиблись, прочитайте свою рабочую тетрадь ещё раз!);
end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт