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.
const fi='timmax.inp';
fo='timmax.out';
var f1,f2:text;
st,xauso:ansistring;
d,i,max,x:longint;
begin
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
readln(f1,st);
d:=length(st);
xauso:='';
max:=0;
for i:=1 to d do
if st[i] in ['0'..'9'] then xauso:=xauso+st[i]
else begin
val(xauso,x);
if max<=x then max:=x;
xauso:='';
end;
if max=0 then writeln(f2,'-1')
else writeln(f2,max);
close(f1);
close(f2);
end.
a) Các phân số viết được:
42/42 ; 42/8 ; 42/7 ; 42/13 ; 8/42 ; 8/8 ; 8/7 ; 8/13 ; 7/42 ; 7/8 ; 7/7 ; 7/13 ; 13/42; 13/8; 13/7; 13/13.
b) Phân số lớn hơn 1:
42/8; 42/7 ; 42/13 ; 8/7; 13/8 ; 13/7.
Phân số bằng 1:
42/42 ; 8/8 ; 7/7 ; 13/13
Phân số bé hơn 1:
8/42 ; 8/13 ; 7/42 ; 7/8 ; 7/13 ; 13/42.
c) Phân số bé nhất là:
7/42.
Phân số lớn nhất là:
42/7
Đáp án A
Phương pháp : Sử dụng công thức 
Cách giải :
Ta có
Dấu = xảy ra
