Регистрация
13t2t
17.02.2021 16:24
Информатика
Есть ответ 👍

написать в программе Паскаль

272
467
Посмотреть ответы 2

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

аян45
аян45
4,5(41 оценок)

Результат на картинке.

6a6yle4ka
6a6yle4ka
4,5(55 оценок)
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 двадцать пять бань

Популярно: Информатика