Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
вывод номера символа на экран
var c, temp : char; flag : boolean; begin flag := true; temp := #0; readln (c); while flag do begin if temp = c then flag := false else begin writeln (ord(c)); temp := c; readln (c); end; end; end.
run
|
edit
|
history
|
help
0
zadacha6
1101010
janja - naloga 2 - 11.7.2013
Урок 3 задачи 1, 2 и расширение задачи 2
Ipis unazad ulancana lista
jhjj
Lab1SumWithWhile
BubbleSor (slimst)
Сумма цифр в строке
For5