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