uses crt;
begin
writeln('Hello world');
gotoxy(20,20); writeln('This should be position (20,20)');
clrscr; writeln('Screen cleared');
TextAttr:=Red; writeln('This is red color');
writeln('This is a longer text of 89 characters, but the line is broken to a new line without need');
writeln('mmmmmmmmmm (10 chars)');
writeln('iiiiiiiiii (10 chars)');
end.