В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
crustiYurasova
crustiYurasova
21.01.2023 08:01 •  Информатика

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

Показать ответ
Ответ:
linaserdyuk13
linaserdyuk13
01.10.2020 18:45
Begin
var x,y:real;
read (x);
if (x>=0) and (x<=9) then
begin
while (y<>x) do
begin
read (y);
if (y<>x)then writeln ('Мимо') else writeln ('Попал');
end;
end else writeln ('Неверный ввод');
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота