Ответы на вопрос:
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.
Популярно: Информатика
-
koshulinskayag30.12.2022 16:31
-
Vovan325613.06.2021 15:01
-
МейнКун0519.12.2022 11:07
-
misha2004211.02.2023 06:56
-
pampuzik27.03.2022 04:51
-
svetik040201p01o4x23.10.2020 06:44
-
Иринка85365302.02.2022 23:12
-
kokola50000110.03.2021 00:13
-
aika04317.05.2020 09:11
-
Nasteahdhdjek25.01.2023 04:19