câu lệnh clrscr dùng để xóa màn hình và chỉ sử dụng được khi đã khai báo thư viện crt.
CHÚC BẠN THI TỐT
Đúng 0
Bình luận (1)
Bài 2. Làm quen với chương trình và ngôn ngữ lập trình
Các câu hỏi tương tự
Đây là chương trình in ra màn hình 2 dòng chữ CHAO CAC BAN, thời gian in mỗi dòng cách nhau 3 giây: Program vd1;uses crt;begin clrscr; {Lau sạch màn hình} writeln(CHAO CAC BAN); {lệnh xuất CHAO CAC BẠN RA MÀN HÌNH} Delay(3000); {lệnh tạm dừng thực hiện lệnh sau nó 3 giây} writeln(CHAO CAC BAN); readln;end. Dựa vào chương trình trên, viết chương trình in ra màn hình dòng chữ KHẨN CẤP nhấp nháy 3 lần!Cần gấp lắm mn ơi huhu
Đọc tiếp
Đây là chương trình in ra màn hình 2 dòng chữ CHAO CAC BAN, thời gian in mỗi dòng cách nhau 3 giây:
Program vd1;
uses crt;
begin
clrscr; {Lau sạch màn hình}
writeln('CHAO CAC BAN'); {lệnh xuất CHAO CAC BẠN RA MÀN HÌNH}
Delay(3000); {lệnh tạm dừng thực hiện lệnh sau nó 3 giây}
writeln('CHAO CAC BAN');
readln;
end.
Dựa vào chương trình trên, viết chương trình in ra màn hình dòng chữ KHẨN CẤP nhấp nháy 3 lần!
Cần gấp lắm mn ơi huhu
Câu lệnh điều kiện dạng đầy đủ là:
If < Điều kiện> then < Câu lệnh 1 >; Else < Câu lệnh 2 >;
If < Điều kiện > then < Câu lệnh 1 > Else < Câu lệnh 2 >;
If < Điều kiện> then < Câu lệnh >;
If < Điều kiện> then < Câu lệnh 1 >, < Câu lệnh 2 >;
sau câu lệnh x=21 div 2 giá trị của biến x là
Câu 14 : A nói trong Free Pascal các lệnh điều kết thúc bằng dấu chấm phẩy , lệnh cuối cùng là End . B nói không hẳng vậy , tôi thấy lệnh kế tiếp end , có thể bỏ qua dấu chấm phẩy . C nói lệnh Begin và Readln được bỏ qua dấu chấm phẩy . D nói C nói sai , A và B nói đúng . theo em bạn nào đúng nhất
Giúp dùm nha ! Cần gấp lắm luôn
Sau khi đã biết sử dụng các câu lệnh nhập , xuất dữ liệu và câu lệnh gán , ta có thể lập trình giải được bài toán đơn giản . Em hãy lập trình và hiển thị giá trị của biểu thức P=√ x+1/ x+x√ x với giá trị của x được nhập từ bàn phím
#help_me
Viết lệnh trong pascal nhập vào 3 cạnh của tam giác sau đó tính chu vi của nó
cho bảng tổng hợp đầy đủ các lệnh (vẽ, nhập, xuất, .. .) trong pascal . thanks nhìu
Nêu công dụng của câu lệnh: Readln('x') (có dấu nháy) và Readln
Chỉnh lỗi
Program GPTBN ;
var a; b, Real ;
Begin
Write( Nhap he so a,b cua phuong trinh :);Readln (a;b)
if a#0 then writeln ('Phuong trinh co nghiem duy nhat x=' -b/a:0:4);
else if b=0 then writeln (' Phuong trinh co vo so nghiem ') ;
else writeln (' phuong trinh vo nghiem ');
Readln;
End.
Giải giúp mk vs ạ mk đang cần gấp . Thank