viết chương trình tạo hiệu ứng sao rơi ( có 100 ngôi sao)

2 câu trả lời

Code chạy pascal:

uses crt;
var i:longint;
begin clrscr;;
for i:=1 to 100 do
begin
write('                                    *');writeln;
delay(200);
end;
end.

uses crt; var i : longint ; begin clrscr;

for i : =1 to 100 do 

begin

write.                                                 *') writeln

delay (200) 

end

Câu hỏi trong lớp Xem thêm