K
Khách

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.

BÀI 6 - THU NGÂNTrong siêu thị, khách hàng sẽ tính tiền tại quầy thu nhân. Sau khi tính tiền nhân viên thu thông báo số tiền phải trả của khách là S đồng, khách đưa P đồng (S, P là bội của 1000). Em hãy lập trình giúp nhân viên thu nhân tính và trả lại tiền thừa (nếu có) sao cho số tờ tiền là ít nhất. Biết rằng tại quầy thu ngân có đủ loại mệnh giá triền và số tờ là vô hạn.Mô tả đầu vàoDòng đầu tiên ghi giá...
Đọc tiếp
BÀI 6 - THU NGÂN

Trong siêu thị, khách hàng sẽ tính tiền tại quầy thu nhân. Sau khi tính tiền nhân viên thu thông báo số tiền phải trả của khách là S đồng, khách đưa P đồng (S, P là bội của 1000). Em hãy lập trình giúp nhân viên thu nhân tính và trả lại tiền thừa (nếu có) sao cho số tờ tiền là ít nhất. Biết rằng tại quầy thu ngân có đủ loại mệnh giá triền và số tờ là vô hạn.

Mô tả đầu vàoDòng đầu tiên ghi giá trị là tổng số tiền phải trả của khách hàng.Dòng thứ hai ghi giá trị là tổng số tiền khách hàng đưa.Mô tả đầu raGồm n dòng, mỗi dòng gồm 2 số k1, k2 cách nhau một khoảng trắng với k1 là mệnh giá tiền, k2 là số tờ tiền có trong cách đưa tiền thừa của nhân viên thu ngân thoả yêu cầu đề bài.Test case mẫuĐầu vào mẫu 11500000 1500000Đầu ra mẫu 10Đầu vào mẫu 2755000 1000000Đầu ra mẫu 2200000 1 20000 2 5000 1
0
28 tháng 12 2022

phần này chưa học nên bó tayhaha

Câu 1: 

uses crt;

var a,b:integer;

begin

clrscr;

readln(a,b);

writeln((a+b)/2:4:2);

readln;

end.

31 tháng 7 2023

Tham khảo!

Theo chương trình ở Hình 1, nếu gia đình em đi xem phim thì phải trả 60000x4 = 240000 VNĐ (với gia đình 4 người).

Nếu đi xem phim trong tuần thì phải trả 40000x4 = 160000 VNĐ

→ Chương trình ở Hình 1 không tính đúng.

21 tháng 10 2019

Mik giải đúng ko ạ? Bạn nào xem hộ mik với🙏

Program tinhtientaxi;

Uses crt;

Var x:integer;

Begin

Clrscr

Write('hay nhap so km:');

Readln(x);

If x>= 11 then write(x*6000)

Else write(x*7000);

Readln;

End.

21 tháng 10 2019

Viết chương trình tính tiền đi taxi,Tiền được tính như sau: từ km thứ 11 trở đi số tiền phải trả là 6000/km,dưới 11km số tiền phải trả là 7000/km,Tin học Lớp 8,bà i tập Tin học Lớp 8,giải bà i tập Tin học Lớp 8,Tin học,Lớp 8

11 tháng 9 2020

program bai1;

uses crt;

var a:longint; tiendien:real;

begin

clrscr;

readln(a);

if a<=100 then tiendien:=a*1000;

if a<=150 then tiendien:=100*1000+2000*(a-100);

if a<=200 then tiendien:=100*1000+2000*50+2500*(a-150);

if a>=200 then tiendien:=100*1000+2000*50+2500*50+3000*(a-200);

Writeln('so tien dien trong thang la:',tiendien:9:0,'VND');

readln;

END.