Question

Информатика


Составить программу, которая запрашивает число пользователя и сравнивает его с рандомным числом. Оба числа в диапазоне до 15



Срочно!!!! Даю 50 баллов

Answer 1

1. var
2.  randomNumber, inputNumber: integer;
3. begin
4.  Readln(inputNumber);
5.  randomNumber := Random(16);
6.  if inputNumber = randomNumber then
7.    Writeln('Числа ', inputNumber, ' и ', randomNumber, ' равны')
8.  else
9.    Writeln('Числа ', inputNumber, ' и ', randomNumber, ' не равны');
10. end.