proc main()
{
    // Print a table using "(SB,F8.3)" format
    io::FormatFlags = io::FMT_ADD_BLANK;
    io::FltFormatChar = 'F';
    io::FieldWidth = 8;
    io::NumDigits = 3;
    "", 3.14159265358979e1*([3,3].iterate()-5), '\n';
}