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

Pascal abc дано расписание работы врачей поликлиники на текущий день: терапевт - 9.00 - 13.00, окулист - 11.00 - 14.00, хирург - 12.00 - 17.00. составить программу, которая по первой букве названия врача напечатает время его приема или сообщение, что такой врач не принимает.

Ответ:
ekaterinkavlas1
ekaterinkavlas1
09.06.2020 00:37

var n:char;

begin

   readln(n);

   if(n = 'т') then write('9.00 - 13.00')

   else if(n = 'о') then write('11.00 - 14.00')

   else if(n = 'х') then write('12.00 - 17.00');

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?