
1.Для каждой введенной цифры (0-9) вывести соответствующее ей название на английском языке (0 -
zero, 1 - one, 2 - two, ...) 2.Составить программу, которая по данному числу (1-12) выводит название соответствующего ему месяца на английском языке. Turbo Pascal

Ответы на вопрос





begin;
readln(n);
case n of
0:writeln('zero');
1:writeln('one');
2:writeln('two');
3:writeln('three');
4:writeln('five');
6:writeln('six');
7:writeln('seven');
8:writeln('eight');
9:writeln('nine');
else writeln('Some number');
end;
end.
2.var n:integer;
begin;
readln(n);
case n of
1:writeln('January');
2:writeln('February');
3:writeln('March');
4:writeln('April');
5:writeln('May');
6:writeln('June');
7:writeln('July');
8:writeln('August');
9:writeln('September');
10:writeln('October');
11:writeln('November');
12:writeln('December');
else writeln('Some number');
end;
end.



1. Вывод названия цифры на английском языке
Для каждой введенной цифры от 0 до 9, можно вывести соответствующее ей название на английском языке. Вот таблица с соответствиями:
- 0 - zero - 1 - one - 2 - two - 3 - three - 4 - four - 5 - five - 6 - six - 7 - seven - 8 - eight - 9 - nine
Например, если введена цифра 3, то соответствующее ей название на английском языке будет "three".
2. Вывод названия месяца на английском языке
Для данного числа от 1 до 12, можно вывести название соответствующего месяца на английском языке. Вот таблица с соответствиями:
- 1 - January - 2 - February - 3 - March - 4 - April - 5 - May - 6 - June - 7 - July - 8 - August - 9 - September - 10 - October - 11 - November - 12 - December
Например, если дано число 5, то соответствующее ему название месяца на английском языке будет "May".
Пример программы на Turbo Pascal
Вот пример программы на Turbo Pascal, которая реализует вывод названия цифры и месяца на английском языке:
```pascal program EnglishNames;
var number: integer; month: integer;
begin writeln('Enter a number (0-9): '); readln(number); case number of 0: writeln('zero'); 1: writeln('one'); 2: writeln('two'); 3: writeln('three'); 4: writeln('four'); 5: writeln('five'); 6: writeln('six'); 7: writeln('seven'); 8: writeln('eight'); 9: writeln('nine'); end; writeln('Enter a month number (1-12): '); readln(month); case month of 1: writeln('January'); 2: writeln('February'); 3: writeln('March'); 4: writeln('April'); 5: writeln('May'); 6: writeln('June'); 7: writeln('July'); 8: writeln('August'); 9: writeln('September'); 10: writeln('October'); 11: writeln('November'); 12: writeln('December'); end; readln; end. ```
Эта программа сначала запрашивает у пользователя число от 0 до 9, а затем выводит соответствующее ему название на английском языке. Затем программа запрашивает у пользователя число от 1 до 12 и выводит соответствующее ему название месяца на английском языке.
Надеюсь, это поможет! Если у вас есть еще вопросы, не стесняйтесь задавать.


Топ вопросов за вчера в категории Информатика







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