uses crt;
var st1,st2:string;
begin
clrscr;
readln(st1);
readln(st2);
writeln('Ten minh ',st1);
writeln('Lop ',st2);
readln;
end.
uses crt;
var st1,st2:string;
begin
clrscr;
readln(st1);
readln(st2);
writeln('Ten minh ',st1);
writeln('Lop ',st2);
readln;
end.
Viết chương trình in ra màn hình 3 dòng chữ:
- Chào các bạn
- Mình tên là ...
- Mình học lớp ...
1. Viết chương trình đơn giản: In ra màn hình 2 dòng chữ:
TRUONG THCS ....
CHAO CAC BAN HOC SINH LOP 8
Mik cần gấp lắm ạ huhu
Cảm ơn mn nhiều
câu 1 viết chương trình in ra màn hình diện tích và chu vi hình vuông s : =a*a; p:=4*a;
câu 2 viết chương trình tính tổng , tích và hiệu của hai số được nhập từ bàn phím
câu 3 viết chương trình kiểm tra 3 số a,b,c có là ba cạnh của một tam giác hay không với a,b,c là 3 số nhập từ bàn phím
Đâ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
Cho 2 số nguyên a,b viết chương trình lấy a chia b lấy phần nguyên rồi gán cho c. Kết quả in ra màn hình.
II/ TỰ LUẬN:
1/ Nêu ý nghĩa các từ khóa sau và các quy tắc đặt tên trong chương trình?
2/ Để chương trình dịch sửa lỗi và chạy chương trình thì ta làm như thế nào?
3/ Hãy chỉ ra các tên không hợp lệ trong Pascal và giải thích vì sao?
a/ Bai toan
b/ Giai-toán
c/ 8A
d/ hoc_sinh
e/ Bang_diem@
viết chương trình Pascal nhập vào 2 số nguyên a và b từ bàn phím . Sau đó in ra tổng, hiệu, tích của a và b
mk đag cần gấp
đặt tên chương trình trong pascal theo tên khác nhau tương ứng với những đại lượng khác nhau