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.
program vd1;
uses crt;
begin
clrscr;
writeln('chao cac ban toi la minh');
readln;
end.
program XinChao;
uses crt;
begin
clrscr;
writeln('Xin chao cac ban!');
writeln('Toi ten la Huyen Minh Lam Nguyet ');
writeln('Toi hoc lop 9');
readln;
end.
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
begin
write ('TRUONG THCS ...');
write ('CHAO CAC BAN HOC SINH LOP 8');
readln ;
end.
hay viet chuong trimh dua ra ngoai man hinh dong thong bao "Chao cac ban! Ten toi la..." (sử dụng ngôn ngữ pascal):
program hello;
begin
writeln('Chào các bạn! Tên tôi là...');
readln;
end.
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.
Program HOC24;
var i: byte;
begin
for i:=1 to 20 do writeln('Toi yeu Viet Nam');
readln
end.
var i: integer;
begin
for i:=1 to 20 do writeln('Toi yeu Viet Nam');
readln
end.
begin
write('xin chao cac ban');
write('toi la free pascal');
readln;
end.
cảm ơn bạn