K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Các câu hỏi dưới đây có thể giống với câu hỏi trên
6 tháng 10 2021
Em cũng làm được cái này nhưng hai câu nó không xuống dòng mà nó cứ ra liên tiếp. Giúp e với
28 tháng 2 2021
uses crt;
var i,n:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
writeln(i,'. XIN CHAO');
readln;
end.
BP
2
24 tháng 10 2018
begin
write('xin chao cac ban');
write('toi la free pascal');
readln;
end.
25 tháng 9 2021
begin
write ('TRUONG THCS ...');
write ('CHAO CAC BAN HOC SINH LOP 8');
readln ;
end.
23 tháng 10 2021
uses crt;
var st1,st2:string;
begin
clrscr;
readln(st1);
readln(st2);
writeln('Ten minh ',st1);
writeln('Lop ',st2);
readln;
end.
Program TH_8;
Uses Crt;
Begin
Clrscr;
Writeln('Xin chao');
Readln;
End.
begin
writeln(' Xin chao ');
readln;
end.