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
codigo
Вычисление sin(x) с помошью ряда Тейлора
iwc ras
test
basketball_player_training
Для Лехи -2
aefrt
C:\Users\skava\Documents\Паскаль
LewisCableCompanyPasProgramme
Naloga 3: 4.7.2016