Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
1
program nedel; uses crt; var n:integer; begin clrscr; writeln('Введите число,чтобы узнать,какому дню недели оно соответствует'); 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('Воскресенье'); readkey; end.
run
|
edit
|
history
|
help
0
диагональ в алфавите
codigo
Calculatrice (case of)
eliminar elementos de un arreglo
test27
SudokuSolver
Сортировка массива цифр
Chouain
Helpme
RENAN COSTA CARLOS DA CUNHA 600623343