program prog3_20; var i: integer; begin for i:=1 to 5 do begin if i > 3 then break; writeln('Szia!'); end; readln; end.