9 lines
109 B
ObjectPascal
9 lines
109 B
ObjectPascal
|
program ScriptName;
|
||
|
|
var
|
||
|
|
prog : String;
|
||
|
|
begin
|
||
|
|
prog := ParamStr(0);
|
||
|
|
write('Program: ');
|
||
|
|
writeln(prog)
|
||
|
|
end.
|