С помощью оператора Readln,writlen,Random составить программу которая будет сравнивать число вводимое с клавиатуры со случайным числом в диапазоне от 0 до 100 результат выводится на экран.

20 Авг 2019 в 08:43
234 +1
1
Ответы
1

var
userInput, randomNumber: integer;
begin
Randomize;
randomNumber := Random(101); // генерация случайного числа от 0 до 100
Write('Введите число от 0 до 100: ');
Readln(userInput); // ввод числа с клавиатуры

if userInput > randomNumber then
Writeln('Ваше число больше случайного числа.');
else if userInput < randomNumber then
Writeln('Ваше число меньше случайного числа.');
else
Writeln('Вы угадали число!');
end.

20 Апр 2024 в 13:35
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир