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.

Đặt giá phòng là x. Thu nhập f(x)

bài toán được phát biểu lại dưới dạng thuần túy Toán học như sau:

Tìm x sao cho f(x) lớn nhất biết rằng khi x = 400 thì f(400) = 400x50, mỗi khi x tăng thêm 20 đơn vị thì f(x+20k) = (x+20k)x(50-2k).

Giá đã tăng: x - 400 (ngàn đồng).

Số phòng cho thuê giảm nếu giá là x:

Số phòng cho thuê với giá x là:

Trả lời câu 1: Thay giá trị x = 500 vào biểu thức trên ta được giá trị cần tìm là 40.

Doanh thu là: f(x) =

Trả lời câu 2: Thế f(x) = 20200 vào phương trình trên, giải phương trình bậc hai, ta được x = 427,64 hoặc x= 472,36

f’(x)=

f’’(x)= -1/5

f’(x) = 0, tương đương x = 450.

và f’’(450) = -1/5< 0

Trả lời câu 3: Theo trên thì x = 450 là cực đại và là cực trị duy nhất.

Tuấn Anh Phan Nguyễn

Đặt giá phòng là x. Thu nhập f(x)

Bài toán được phát biểu lại dưới dạng thuần túy toán học như sau:

Tìm x sao cho f(x) lớn nhất biết rằng khi x = 400 thì f(400) = 400x50, mỗi khi x tăng thêm 20 đơn vị thì f(x+20k) = (x+20k)x(50-2k).

Giá đã tăng: x - 400 (ngàn đồng).

Số phòng cho thuê giảm nếu giá là x:

Số phòng cho thuê với giá x là:

Trả lời câu 1: Thay giá trị x = 500 vào biểu thức trên ta được giá trị cần tìm là 40.

Doanh thu là: f(x) =

Trả lời câu 2: Thế f(x) = 20200 vào phương trình trên, giải phương trình bậc hai, ta được x = 427,64 hoặc x= 472,36

f’(x)=

f’’(x)= -1/5

f’(x) = 0, tương đương x = 450.

và f’’(450) = -1/5< 0

Trả lời câu 3: Theo trên thì x = 450 là cực đại và là cực trị duy nhất.

Căn cứ theo đề bài thì khách sạn chỉ được phép tăng 20, 40, 60... Ngàn. Vì theo tôi tăng 20 ngàn thì giảm 2 phòng không có nghĩa là tăng 10 ngàn sẽ giảm 1 phòng. Mình sẽ lập được phương trình sau: y= (50 - x/10) (400+x) trong đó x là số tiền tăng lên (20, 40, 60... ) câu 1: 40 phòngcâu 2: cho phương trình y= 20200 giải ra x = 72 ngàn hoặc 27 ngàn (đều không thỏa mãn điều kiện)câu 3: tính đạo hàm y' = 2x-100 = 0 <==> x = 50 ngàn (không thỏa), nên chỉ có thể x = 40 ngàn hoặc 60 ngàn, đều cho ra số tiền là 20tr240 ngàn

1/       có không phòng trống

2/ mình ko biết

3/ mình ko biết

1.còn 45 phòng

2.1 phòng giá 440 ngàn

3.giá 700 ngàn

uses crt;

var a,b,c,tb:array[1..10]of real;

ln,nn:real;

i:integer;

begin

clrscr;

for i:=1 to 10 do readln(a[i],b[i],c[i]);

for i:=1 to 10 do 

  tb[i]:=(a[i]+b[i]+c[i])/3;

ln:=0;

nn:=10;

for i:=1 to 10 do 

  begin

if ln<tb[i] then ln:=tb[i];

if nn>tb[i] then nn:=tb[i];

end;

writeln(ln:4:2);

writeln(nn:4:2);

for i:=1 to 10 do 

 begin

if tb[i]>=5 then writeln('Ban thu ',i,' Dat')

else writeln('Ban thu ',i,'Chua dat');

end;

readln;

end.