Написать программу хакер компьютер загадывает число от 0 до 99 пользователь разгадывает его вводя числа с клавиатуры

Question

Информатика

Федан

17 марта, 07:34

Написать программу хакер компьютер загадывает число от 0 до 99 пользователь разгадывает его вводя числа с клавиатуры

+5

Ответы (1)

Знаете ответ?

Настасия · Answer 1

Program hacker;

var a, b:integer;

begin

a:=random (100) ;

repeat

begin

read (b) ;

if ab then writeln ('Вы не угадали число')

else writeln ('Поздравляю! Вы угадали число') ;

end;

until b=a;

end.