4 lines
92 B
Text
4 lines
92 B
Text
procedure main(args)
|
|
every (s := 0) +:= !args
|
|
write((real(s)/(0 ~= *args)) | 0)
|
|
end
|