cho các số 1,2,3,.....,49,50
hãy bỏ 2 số để tổng của dãy trên bé hơn 1178
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.
Để chữ số của dãy số bằng 2x
\(\Rightarrow\)Số chữ số gấp 2 lần các số hạng.
Từ 1 đến 9 phải bù : (9 - 1) + 1 = 9 chữ số.
9 chữ số cần bù này sẽ lấy vào 9 chữ số của số có 3 chữ số.
\(\Rightarrow\)x = 99 + 9 = 108
Vậy số cần tìm là 108 .
Chúc bạn học tốt và k đúng cho mình.
program bai1;
uses crt;
var i,j,d:integer;
a:array[1..100]of real;
t,k:real;
begin
clrscr;
i:=1;
while 1/i>0.0321 do
begin
a[i]:=1/i;
inc(i);
d:=i;
end;
writeln('mang tren co ',d,' so hang');
i:=1;
while t+a[i]<=3 do
begin
t:=t+a[i];
inc(i);
end;
writeln('so can tim la: ',a[i+1]:5:4);
writeln(a[i+1]:5:4,' la so hang thu ',i+1);
write('nhap k:');readln(k);
for i:=1 to d do
if (k>a[i])and(k<a[i-1]) then writeln(k:5:4,' nam giua ',a[i]:5:4,' va ',a[i-1]:5:4);
readln;
end.
program bai1;
uses crt;
var i,j,d:integer;
a:array[1..100]of real;
t,k:real;
begin
clrscr;
i:=1;
while 1/i>0.0321 do
begin
a[i]:=1/i;
inc(i);
d:=i;
end;
writeln('mang tren co ',d,' so hang');
i:=1;
while t+a[i]<=3 do
begin
t:=t+a[i];
inc(i);
end;
writeln('so can tim la: ',a[i+1]:5:4);
writeln(a[i+1]:5:4,' la so hang thu ',i+1);
write('nhap k:');readln(k);
for i:=1 to d do
if (k>a[i])and(k<a[i-1]) then writeln(k:5:4,' nam giua ',a[i]:5:4,' va ',a[i-1]:5:4);
readln;
end.
tổng các số đó là
(50+1)*50:2=1275
g/s:a và b là 2 số đó
=>1275-(a+b)<1178
=>a+b>1275-1178
=>a+b>97 vì a+b>97 thì khi loại bỏ hai số đó thì tổng sẽ nhỏ hơn 1178
nếu a=49;b=50 =>49+50=99(được)
nếu a=48;b=49=>48+49=97(loại)
Vậy hai số đó là 49 và 50
chú ý: *:nhân
tổng của 50 số là:
(1+ 50) x 50:2 =1275
để loại 2 số thì tổng của 2 phải lớn hơn : 1275 -1178=97
ta thấy 48+50=98
49+50=99
hai số phải bỏ là 48 và 50 hoặc 49 và 50
vậy 48 số còn lại là 1,2,3,........,48
hoặc 1,2,3..........49