11 lines
240 B
Text
11 lines
240 B
Text
procedure main(arglist)
|
|
|
|
if *arglist > 0 then
|
|
every ( s := "" ) ||:= !arglist || " "
|
|
else
|
|
s := "The quick brown fox jumps over the lazy dog."
|
|
|
|
writes(image(s), " -- is")
|
|
writes(if not panagram(s) then "n't")
|
|
write(" a panagram.")
|
|
end
|