Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Blog
Zadanie 3 б
Program Chisla; Var CH:Integer; {целое число} Begin Read(CH); {запросим число с клавиатуры} Case CH of 1: writeln ('один'); 2: writeln ('два'); 3: writeln ('три'); 4: writeln ('четыре'); 5: writeln ('пять'); 6: writeln ('шесть'); 7: writeln ('семь'); 8: writeln ('восемь'); 9: writeln ('девять'); 0: writeln ('ноль'); else WriteLn('ошибка'); end; End.
run
|
edit
|
history
|
help
0
Please
log in
to post a comment.
Задание 27 2018 г.
AR sredine
Zad 4
Fibonacijev niz
Registracioni broj firme
For10
aaaaaaa
Kacper
eliminar elemento de un arreglo
homework
Please log in to post a comment.