Написать программу, которая выводит на экран вопрос: "в каком году появились первые эвм? " и ждёт ответа.в зависимости от ответа, программа сообщает: "вы правы! " или "вы ошиблись, прочитайте свою рабочую тетрадь ещё раз! "
Var b; integer; begin writeln ("В каком году появились первые ЭВМ?''); readln (b); if b=1943 then writeln ('Вы правы!') else writeln ('Вы ошиблись, прочитайте свою рабочую тетрадь ещё раз!'); end.
begin
writeln ("В каком году появились первые ЭВМ?'');
readln (b);
if b=1943 then
writeln ('Вы правы!')
else
writeln ('Вы ошиблись, прочитайте свою рабочую тетрадь ещё раз!');
end.