8 lines
82 B
ObjectPascal
8 lines
82 B
ObjectPascal
var
|
|
a,p1: real;
|
|
s: string;
|
|
|
|
begin
|
|
var p3,p1,p5,p6: integer;
|
|
p1 := 3;
|
|
end. |