10: Viết chương trình nhập vào số ngày thuê phòng khách sạn, loại phòng (A, B, C).- phòng loại A : 300000/ngày- phòng loại B : 250000/ngày- phòng loại C : 200000/ngàyTính tiền và xuất ra có quy cách.mong mọi người giúp...
Đọc tiếp
10: Viết chương trình nhập vào số ngày thuê phòng khách sạn, loại phòng (A, B, C).
- phòng loại A : 300000/ngày
- phòng loại B : 250000/ngày
- phòng loại C : 200000/ngày
Tính tiền và xuất ra có quy cách.
mong mọi người giúp mình😊😊😊😊😊😊
Tham Khảo:
uses crt;
var ngay:integer;
lp:string;
begin
clrscr;
repeat
write('nhap so ngay thue phong khach san:'); readln(ngay);
if ngay<=0 then writeln('nhap lai');
until ngay>0;
repeat
write('nhap loai phong:'); readln(lp);
if (lp<>'A') and (lp<>'B') and (lp<>'C') then writeln('nhap lai');
until (lp='A') or (lp='B') or (lp='C');
case lp of
'A': write(300000*ngay);
'B': write(250000*ngay);
'C': write(200000*ngay);
end;
readln;
end.