Написать программу, которая выводит пример на вычитание (в пределах 100), запрашивает ответ пользователя, проверяет ответ и выводит сообщение "Правильно!" или "Вы ошиблись" и правильный результат

1

Ответы и объяснения

  • MiLL
  • хорошист
2011-03-25T12:12:33+03:00

program ProgramXY;
const n=100;

var inputText : integer;
begin  Randomize;

var x := Random(n) + 1;

var y := Random(n) + 1;

var z := x - y;

writeln('Решите пример: ', x, ' - ', y, ' = ');

readln(inputText);

if inputText = z then    writeln('Правильно!')

else    writeln('Вы ошиблись! Правильный ответ: ', z)

end.

 

Где-то так это выглядит на Паскале. Ошибки не обработаны, так что, если вместо числа ввести строку - программа умрет по исключению.