DedikovVladisl

19.05.2022 10:44 •  Информатика

Укажите результат выполнения данного фрагмента программы: var n: byte;beginwrite (1 – den 7 – ge deyingi sandi engiz);read(n);case n of1: Writeln(‘Duysenbi’);2: Writeln(‘Seysenbi’);3: Writeln(‘Sarsenbi’);4: Writeln(‘Beysenbi’);5: Writeln(‘Juma’);6: Writeln(‘Senbi’);7: Writeln(‘Jekseni’);else writeln(‘Duris emes’);end.
a) Времена года
b) Дни недели
c) Месяцы​