Помогите написать 2 программы на паскале , пожалуйста(((
2)program chislo;var n : shortint;beginwrite(Введи число: );readln(n);case n of1: write(Январь);2: write(Февраль);3: write(Март);4: write(Апрель);5: write(Май);6: write(Июнь);7: write(Июль);8: write(Август);9: write(Сентябрь);10: write(Октябрь);11: write(Ноябрь);12: write(Декабрь);end;End.
Оцени ответ
