"сколько лет бабушке?"Компьютер загадывает целое число от 1 до 100. Пользователь вводит с клавиатуры некоторое число и получает один из ответов:"Мое чило меньше","Мое число больше","Вы угадали".процесс повторяется до тех пор пока не будет угадано число.
помогите на паскале сделать
var
a,answer:integer;
begin
randomize;
a:=random(101);
while (a<>answer) do
begin
readln (answer);
if (answer>a) then writeln (Загаданное число меньше) else writeln (Загаданное число больше);
end;
writeln (Вы угадали число!);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
