làm sao để in ra dòng chữ tiếng việt trong turbo pascal cho vd 26/07/2021 Bởi Gabriella làm sao để in ra dòng chữ tiếng việt trong turbo pascal cho vd
dùng thư viện tcvn: Program CTVN2; USES tcvn; BEGIN loadfont; writeln(telex(‘Ddaay laf moojt dofng tieesng Vieejt’)); write(telex(‘Nhaajp tieesng Vieejt kieeru’),’ Telex: ‘); readln; unloadfont; END. Bình luận
uses crt;var i:byte;begin clrscr; i:=1; while i<=5 do begin writeln(‘Turbo Pascal’); i:=i+1; end; readlnend. Bình luận
dùng thư viện tcvn:
Program CTVN2;
USES tcvn;
BEGIN
loadfont;
writeln(telex(‘Ddaay laf moojt dofng tieesng Vieejt’));
write(telex(‘Nhaajp tieesng Vieejt kieeru’),’ Telex: ‘);
readln;
unloadfont;
END.
uses crt;
var i:byte;
begin
clrscr;
i:=1;
while i<=5 do
begin
writeln(‘Turbo Pascal’);
i:=i+1;
end;
readln
end.