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

Используемые в республике молдова монеты имеют значения 1,5,10,25 или 50 бань. напишите программу на языке паскаль, которая считывает с клавиатуры числовое значение монеты и выводит на экран это же значение словами. например, если пользователь вводит "25", то на экран выводится "двадцать пять бань". если же пользователь вводит отличное от 1,5,10,25 или 50 значение, то на экран выводится сообщение "недопустимое значение"

Показать ответ
Ответ:
Mashatry
Mashatry
03.10.2020 11:25
Var m:integer;
begin
write('m = '); readln(m);
case m of
  1 : writeln('один бань');
  5 : writeln('пять бань');
 10: writeln('десять бань');
 25: writeln('двадцать пять бань');
 50: writeln('пятьдесят бань');
 else writeln('недопустимое значение');
 end;
end.

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