1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
{ writeln with a variety of arguments } program check_writeln(output); const floater = 1.8; low = 37; high = 492; range_string = ' range='; var range : low..high; begin range := (low + high) div 2; writeln('A', range_string, range, ' B floater=', floater); end.