Luyện tập sử dụng write và writeln
Viết chương trình in ra màn hình các yêu cầu sau
bài 1)
************
***********
**********
*********
********
*******
******
*****
****
***
**
*
Bài 2)
***************************************
* *
* XIN CHAO *
* *
***************************************
Thứ Tư, 17 tháng 7, 2019
Pascal1_2019
Đăng ký:
Đăng Nhận xét (Atom)
Thầy đã nhận được bài làm của LisaManoban trên email. Bài làm của em rất tốt, phát huy nhé
Trả lờiXóaprogram vd1;
Trả lờiXóauses crt;
begin
clrscr;
writeln('chao cac ban');
readln;
end.
program vd1;
Trả lờiXóauses crt;
begin
clrscr;
write('************');
write('***********');
write('**********');
write('*********');
write('*******');
write('******');
write('*****');
write('****');
write('***');
write('**');
write('*');
readln;
end.
BÀI 2
Trả lờiXóaprogram vd1;
uses crt;
begin
clrscr;
write('************************************');
write('* *');
write('* XIN CHAO *');
write('* *');
write('************************************');
readln;
end.