| Pascal Advanced |
| var begin end for i j n m x integer longint real int64 boolean break writeln readln array for i:= to downto record randomize random div mod copy pos delete round ceil floor if then else > < = := type const <> inc dec uses do try except finally function procedure write read arr answ min max swap qsort readit writeit solveit length assign input output file.in file.out ok:=true |
Комментарии