Котик загадывает случайное число от 1 до 10. это число записано в переменной. котик тебя спрашивает: какое число я

Question

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

ezaovabiana · Answer

var a,b,k:integer;beginb:=random(10)+1;WriteLn( Какое число я загадал? );k:=3;repeat Write( У тебя ,k, попытки(-а). Введи число: );ReadLn(a);if a b then WriteLn( Мое число меньше! )elseif a b then WriteLn( Мое число больше! )else  if a=b thenbeginWriteLn( Молодец! Угадал! );k:=0;end;k:=k-1until k =0;if k=0 then WriteLn( Проиграл! );end....

Популярные вопросы