![](https://rs.olm.vn/images/avt/0.png?1311)
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.
![](https://rs.olm.vn/images/avt/0.png?1311)
![](https://rs.olm.vn/images/avt/0.png?1311)
Qui tắc đặt tên trong ngôn ngữ lập trình Pascal:
- Tên không bắt đầu bằng chữ số.
- Tên không có khoảng cách.
- Tên không được trùng với từ khóa.
- Các đại lượng khác nhau có tên khác nhau.
![](https://rs.olm.vn/images/avt/0.png?1311)
uses crt;
var i,sokm:integer;
tong:real;
begin
write('nhap so km: ');readln(sokm);
for i:=1 to n do
begin
if i=1 then tong:=tong+5000;
else if tong>=2 and tong<=5 then tong:=tong+4500;
else tong:=tong+3500;
end;
if sokm>120 then tong=(tong/10)*9;
writeln('so tien la ',tong,' dong');
readln;
end.
![](https://rs.olm.vn/images/avt/0.png?1311)
Cú pháp: While <điều kiện> do <câu lệnh>
Hoạt động: Câu lệnh viết sau từ khóa do được thực hiện khi biểu thức điều kiện còn nhận giá trị true. Biểu thức điểu kiện được tính giá trị trước khi câu lệnh được thực hiện, nhưng nếu biểu thức điểu kiện đã nhận giá trị false ngay từ đầu thì câu lệnh không được thực hiện lần nào. Nếu biểu thức điều kiện luôn nhận giá trị true thì câu lệnh được thực hiện mãi, ta gọi là vòng lặp vô hạn.
Cú pháp While ( điều kiện) do ( câu lệnh )
while, do là từ khóa
điều kiện thường là phép so sánh
câu lệnh có thể là câu lệnh đơn giản hay câu lệnh ghép
Hoạt động
để viết ctrinh chỉ dẫn mtinh thực hiện các hđộng lặp mà chưa xác định đc trước số lần lặp ta cthe sử dụng câu lệnh có dạng lặp với số lần chưa xác định