21 lines
No EOL
409 B
Text
Executable file
21 lines
No EOL
409 B
Text
Executable file
d:=300;
|
|
|
|
|
|
y:= 2 + 2 - 8 * 7 / 1;
|
|
while (d < 1000) do
|
|
x:= 10;
|
|
y := 30;
|
|
d := x * y + d;
|
|
print(d*2);
|
|
print (d*2;
|
|
print ( d *2 ) ;
|
|
print (d * 2 ) ;
|
|
;;;;
|
|
a := { 1; 2 ; 3 ;4};
|
|
d := read ();
|
|
d := read( ) ;
|
|
/*** comment */
|
|
///////// comment
|
|
/* ;; ; // */
|
|
when (2 * 2 > 0 && d < 10 || 9 / 3 && !a) then y:=2 else
|
|
y:=25 ; |