реализуйте решение задачи, программируя на Паскале. Программа морскрй бой. Учитель задумывает два числа от 0 до 9. (Водятся учителемв Вашу программу). Игрок пытается их угадать, вводя свои числа. Если они совпали (в указанном порядке), то игрок выиграл (выводится сообщение-"попал"). Иначе-сообщение "мимо".

Question

Информатика

Снежана

17 мая, 23:19

реализуйте решение задачи, программируя на Паскале. Программа морскрй бой. Учитель задумывает два числа от 0 до 9. (Водятся учителемв Вашу программу). Игрок пытается их угадать, вводя свои числа. Если они совпали (в указанном порядке), то игрок выиграл (выводится сообщение-"попал"). Иначе-сообщение "мимо".

+4

Ответы (1)

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

Никон · Answer 1

Begin

var x, y:real;

read (x) ;

if (x>=0) and (x<=9) then

begin

while (yx) do

begin

read (y) ;

if (yx) then writeln ('Мимо') else writeln ('Попал') ;

end;

end else writeln ('Неверный ввод') ;

end.