Run Code
|
API
|
Code Wall
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
NOT a String in Pascal
program NotAString; //For Caleb var StartStr : string = 'Hello World!'; i : integer; CurrentByte : byte; EndStr : string; begin writeln(StartStr); for i := 0 to length(StartStr) do begin CurrentByte := NOT Byte(StartStr[i]); EndStr[i] := Char(CurrentByte); end; writeln(EndStr); end.
run
|
edit
|
history
|
help
0
Enkripsi2
Projet1
a 3 .a
Пузырьковая сортировка, среднее и среднее медианное
zadacha6
nomer9
P170815A - Cálculo da massa de um tanque
P170808E
Zadanie 3 a
Huong11a2@