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

Question

Информатика

Августа

21 февраля, 16:54

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

+5

Ответы (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.