12 lines
232 B
Text
12 lines
232 B
Text
MODULE Conv EXPORTS Main;
|
|
|
|
IMPORT IO, Fmt;
|
|
|
|
BEGIN
|
|
FOR i := 1 TO 33 DO
|
|
IO.Put(Fmt.Int(i, base := 10) & " ");
|
|
IO.Put(Fmt.Int(i, base := 16) & " ");
|
|
IO.Put(Fmt.Int(i, base := 8) & " ");
|
|
IO.Put("\n");
|
|
END;
|
|
END Conv.
|