10 lines
222 B
Text
10 lines
222 B
Text
link printf
|
|
|
|
procedure main()
|
|
|
|
every r := &pi | -r | 100-r do {
|
|
write(r," <=== no printf")
|
|
every p := "|%r|" | "|%9.3r|" | "|%-9.3r|" | "|%0.3r|" | "|%e|" | "|%d|" do
|
|
write(sprintf(p,r)," <=== sprintf ",p)
|
|
}
|
|
end
|