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
nomer2
test3
Алгоритм умножения двухзначного числа на 11
Ariketa 06
9
Assignment 1
bai1
formato_real
1 2
Task1-1