profile
Опубликовано 5 лет назад по предмету Информатика от Анямаре

Используемые в Республике Молдова монеты имеют значения 1,5,10,25 или 50 бань. Напишите программу на языке ПАСКАЛЬ, которая считывает с клавиатуры числовое значение монеты и выводит на экран это же значение словами. Например, если пользователь вводит "25", то на экран выводится "двадцать пять бань". Если же пользователь вводит отличное от 1,5,10,25 или 50 значение, то на экран выводится сообщение "недопустимое значение"

  1. Ответ
    Ответ дан petyaGavrikov
    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
    двадцать пять бань
Самые новые вопросы