Ответы на вопрос:
Var n: integer; begin writeln('введите номер дня недели от 1 до 7'); readln(n); if n=1 then writeln('понедельник'); if n=2 then writeln('вторник'); if n=3 then writeln('среда'); if n=4 then writeln('четверг'); if n=5 then writeln('пятница'); if n=6 then writeln('суббота'); if n=7 then writeln('воскресенье'); end. самая простая программа, не затрагивает более сложные разделы изучения языка pascal.
Популярно: Информатика
-
кккосомомкамилла32718.08.2022 06:32
-
Karina90225.02.2023 07:56
-
algebraigeometria119.04.2023 11:00
-
ludvig912.06.2020 19:29
-
keke71701.03.2023 03:01
-
yuljasha1982p0bvky25.08.2022 16:32
-
mashadumbrava108.10.2020 14:02
-
Арти75425.10.2020 23:34
-
arinabolshakov103.03.2023 17:31
-
Vladlenna30.03.2021 16:38