1module main; 2from io import Writef, output; 3var a : array[1..100] of char; 4begin 5 a := "blah"; 6 Writef(output, "%s", a); 7end main. 8