Trang chủ Tin Học Lớp 8 một hãng taxi đưa ra bảng giá như sau 1km...

một hãng taxi đưa ra bảng giá như sau 1km đầu là 15000 2km đến 10km là 14000/km 11km đến 20 km là 125000/km 21 trở đi là 9000/km vt ct nhập vào từ bàn phím số

Câu hỏi :

một hãng taxi đưa ra bảng giá như sau 1km đầu là 15000 2km đến 10km là 14000/km 11km đến 20 km là 125000/km 21 trở đi là 9000/km vt ct nhập vào từ bàn phím số km đã đi n (n>0) và in ra màn hình số tiền phải trả pascal

Lời giải 1 :

uses crt;

var tien,km:longint;

begin

clrscr;

write('*Nhap so km: ');

readln(km);

if (0<km) and (km<15000) then tien:=15000;

if (11>=km) and ( km<=20) then tien:=14000*km;

if (km>21) then tien:=9000*km;

writeln('tien thanh toan : ',tien);

readln

end.

Thảo luận

-- ckao
-- =)))
-- Nể lw ms cho hn nhá
-- bài của bạn cụng sai đê nha
-- bổ sung if km<0 then writeln('nhap sai du lieu');
-- để sau readln(km);
-- kh cần
-- ukk

Lời giải 2 :

Uses crt;
Var tt,km: longint;
Begin
        Clrscr;
        Write('He he nban da duy bao nheiu km rùi nhap vao day de thanh toan: '); Readln(km);

        If km<0 then Writeln(`Ban dua toi a lam j co',n'  km ha);
        If km=1 then tt:=15000;
        If (km<=2) and (km>=10) then tt:=14000*km;
        If km<=11 and ( km>=200 then tt: 125000*km;

        If km<= 21 then tt:=9000*km;
         Write('So tien phai tra la: ',tt:0:2);
        Readln;
End.

Bạn có biết?

Tin học, tiếng Anh: informatics, tiếng Pháp: informatique, là một ngành khoa học chuyên nghiên cứu quá trình tự động hóa việc tổ chức, lưu trữ, xử lý và truyền dẫn thông tin của một hệ thống máy tính cụ thể hoặc trừu tượng (ảo). Với cách hiểu hiện nay, tin học bao hàm tất cả các nghiên cứu và kỹ thuật có liên quan đến việc mô phỏng, biến đổi và tái tạo thông tin.

Nguồn : Wikipedia - Bách khoa toàn thư

Tâm sự 8

Lớp 8 - Năm thứ ba ở cấp trung học cơ sở, học tập bắt đầu nặng dần, sang năm lại là năm cuối cấp áp lực lớn dần nhưng các em vẫn phải chú ý sức khỏe nhé!

Nguồn : ADMIN :))

Liên hệ hợp tác hoặc quảng cáo: gmail

Điều khoản dịch vụ

Copyright © 2021 HOCTAPSGK