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

Question

Информатика

Федан

15 июля, 16:48

Написать программу хакер компьютер загадывает число от 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.