Program RLN; var x:byte; begin writeln('Введите число, чтобы узнать, какому месяцу оно соответствует:'); Readln(x); Case x of 0: writeln('Такого месяца не существует'); 1: writeln('Январь.'); 2: writeln('Февраль.'); 3: writeln('Март.'); 4: writeln('Апрель.'); 5: writeln('Май.'); 6: writeln('Июнь.'); 7: writeln('Июль.'); 8: writeln('Август.'); 9: writeln('Сентябрь.'); 10: writeln('Октябрь.'); 11: writeln('Ноябрь.'); 12: writeln('Декабрь.'); 13..1000: writeln('Такого месяца не существует.'); end; end.
Исходная цепочка ЛОМ 1-й шаг ЛОМ 2-й шаг ЛОММОЛ 3-й шаг ЛОММОЛН 4-й шаг ЛОММОЛН 5-й шаг ЛОММОЛННЛОММОЛ 6-й шаг ЛОММОЛННЛОММОЛО Результат ЛОММОЛННЛОММОЛО Количество букв «О» 5
4.
Исходная цепочка КОЛ 1-й шаг Л 2-й шаг ЛЛО 3-й шаг ЛЛОК Результат ЛЛОК
5.
Номер строки Строка 1 1 2 21 3 312 4 4213 5 53124 6 642135 .............. 9-я строка будет оканчиваться на четные цифры от 8 вниз 2468
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку