В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Ландыш098
Ландыш098
18.04.2022 03:03 •  Информатика

Котик загадывает случайное число от 1 до 10. это число записано в переменной. котик тебя спрашивает: какое число я загадал? а затем сравнивает твой ответ с числом, которое загадал. если твой ответ равен числу, то ты выиграл. если число больше ответа, то котик говорит: “мое число больше! ” если число меньше ответа, то котик говорит: ”мое число меньше! ” всего дается 3 попытки, чтобы угадать число! для этого используй еще одну переменную попытки. попытки уменьшаются, когда ты ввел неправильное число.

Показать ответ
Ответ:
KATE4213
KATE4213
09.10.2020 09:57

var a,b,k:integer;

begin

b:=random(10)+1;

WriteLn('Какое число я загадал?');

k:=3;

repeat

Write('У тебя ',k,' попытки(-а). Введи число: ');

ReadLn(a);

if a>b then WriteLn('Мое число меньше!')else

if a<b then WriteLn('Мое число больше!')else  

if a=b then

begin

WriteLn('Молодец! Угадал!');

k:=0;

end;

k:=k-1

until k<=0;

if k=0 then WriteLn('Проиграл!');

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота