program; var i:byte; str:string; begin For i:=60 to 70 do begin Str:=str+Chr(i) ; end; writeln(str); end.