1. Информатика
  2. Напишите программу которая

Напишите программу которая выводит на экран слово "женский" при вводе символа ж и словa " мужской" при вводе символа м

Сандалёк Сандалёк    2   25.05.2019 06:50    1

Ответы
Annnnnnnnnnнnna Annnnnnnnnnнnna  21.06.2020 07:48
Var a: char;
begin
     readln(a);
     if (a = 'М') then writeln('Мужской');
     if (a = 'Ж') then writeln('Женский');
end.

Проверил =)
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Parastaev Parastaev  13.07.2019 05:00
Увас есть три пользователя: виталий, андрей и павел, которые не дружат друг с другом. известно, что у виталия и андрея 50 общих друзей, у андрея и павла 91 общих друзей,...
NataNati NataNati  13.07.2019 05:00
Составить программу перевода расстояния в дюймах в сантиметры(1 дюйм=2,54 см).дюймы изменяются от 1 до 10 с шагом 1. вывод оформить в виде таблицы. в ! !...
hatidzemustafaeva hatidzemustafaeva  13.07.2019 05:00
Как описывается файловая переменная для работы с типизированным файлом? !...
pro100leramakh pro100leramakh  13.07.2019 05:00
Увас есть три пользователя: виталий, андрей и павел, которые не дружат друг с другом. известно, что у виталия и андрея 56 общих друзей, у андрея и павла 96 общих друзей,...
Sofiaminkina06 Sofiaminkina06  01.06.2019 11:50
Музыкальный диск стоит 176 рублей 28 копеек. у вас имеется 1500 рублей и 54 копейки. написать программу, которая выводит сообщение да , если у вас хватит денег на покупку...
Arisha2544 Arisha2544  01.06.2019 11:50
Что указывают в вершинах схемы переходов? а) имена объектов б) имена выделенных состояний в) имена событий...
RassiaScream RassiaScream  01.06.2019 09:16
Какой из этих разъемов для зарядки? ​...
kristinka078 kristinka078  01.06.2019 09:55
Напишите программу на языке pascal. программа должна находить сумму чисел заданных формулой, в отчёте укажите листинг программы.s=sin3x+sin4x+sin5x++sin11x...
Макслей Макслей  01.06.2019 10:03
Спо программированию на языке фортран: составить программу для нахождения произведения элементов двух строк прямоугольной матрицы с заданными номерами (основное действие...
LysaPysa LysaPysa  01.06.2019 10:36
Файл размером 15 кбайт передается через некоторое соединение за 1 минуту.найти скорость передачи данных в единицах бит в секунду...

Популярные вопросы