Pascal (Угадай число) помогите разобраться
В чем?
Как сделать это задание!
//Моя интуиция подсказывает мне, что это должно выглядеть так var a,b:integer; begin; randomize; a:=random(10); readln(b); if a=b then writeln('Угадала') else writeln('Не угадала, было загадано:',a); end.
А мне кажется, что здесь надо организовать поиск при помощи деления интервалов пополам: Ты загадал однозначное число, например 4. Я спрашиваю: загаданное число больше 5 (отрезок от 1 до 10 я разделил пополам) Ты отвечаешь : НЕТ. Я спрашиваю это число меньше 3 (я разделил отрезок от 1 до 5 пополам. Ты отвечаешь Нет. Я говорю: загадано 4