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.
uses crt;
var j,i:longint;
b,a:int64;
begin
clrscr;
writeln('nhap tu va mau');readln(a,b);
if b=0 then writeln('day ko la phan so') else begin
for i:=1 to a do
for j:=1 to b do
if (a mod i=0)and(b mod j=0)and(i=j) then begin
a:=a div i;
b:=b div j;
end;
for i:=1 to a do
for j:=1 to b do
if (a mod i=0)and(b mod j=0)and(i=j) then begin
a:=a div i;
b:=b div j;
end;
end;
if a mod b=0 then writeln('ket qua sau khi rut gon la ',a div b)
else writeln('ket qua sau khi rut gon la ',a,'/',b);
readln
end.
program rutgon;
var a,b,m,R,n:int64;
begin
write('nhap so tu nhien m:');
readln(m)
; write('nhap so tu nhien n:');
readln(n);
a:=n;
b:=m;
while b<>0 do begin
R:=a mod b;
a:=b;
b:=R;
end;
write('phan so da duoc rut gon la:',m/a:0:0,'/',n/a:0:0);
readln;
end.
Nhanh-gọn-dễ hiểu
Bài 1: 2017 - 2a < 2017 - 2b
<=> -2a < -2b
<=> 2a > 2b
<=> a > b
b) a > b
=> -2018a < -2018b
=> -2018a + 29 < -2018b + 29 ( đpcm)
Bài 2:
( x + 5) ( x - 5) > (x+2)2 + 4
=> x2 - 25 > x2 + 4x + 8
=> -4x > 33
=> x < -8,25
Bài 1: a) 2017 - 2a <2017 - 2b
⇒ -2a < -2b
⇒ a > b
b)-2018a + 29 < -2018b - 29
⇒ -2018a < - 2018b
⇒a > b (đpcm)
Bài 2:
(x+5) (x- 5) > (x+2)2 + 4
⇔ x2 - 5x + 5x - 25 > x2 + 4x + 4 + 4
⇔ x2 - 5x + 5x - x2 - 4x > 4+ 4+ 25
⇔ - 4x > 33
⇔x < -33/4
a,
QUẢNG CÁO
b, Nhận xét:
– Đất phù sa mới chủ yếu phân bố ở các đồng bằng: đồng bằng sông Hồng, đồng bằng sông Cửu Long và các đồng bằng Duyên hải miền Trung.
– Đất xám phân bố ở Đông Nam Bộ và phía tây Tây Nguyên.
– Đất pheralit badan tập trung nhiều nhất ở Tây Nguyên.
– Các loại đất pheralit khác và đất mùn núi cao có diện tích lớn nhâ’t và phân bô ở nhiều khu vực nước ta Trung du và miền núi Bắc Bộ, Ouyên hải Miền Trung, Tây Nguyên…
Tóan này lớp 7 nhé
Ta có: X = (1.0 + 2.0 + 3.2 + 4.n +5.10 + 6.12 + 7.7 + 8.6 +9.4 + 10.1)/N = 60,6
=> 271 + 4n = 60,6N (1)
Lại có: 0+0+2+n+10+12+7+6+4+1 = N => 42 + n = N thế vào (1) có:
271 + 4n = 60,6(42 +n)
271 + 4n = 2545,2 + 60,6n
=> tìm n => N
Bạn xem lại số liệu bài cho, chứ ko thể có tần số n = số âm nhé.
Cách làm những bài này là như vậy
Gợi ý :
- thủ tục đọc file : đọc hai số a và b
-hàm đối xứng
- thủ tục ghi vào file : ghi số các số đối xứng thỏa mãn
uses crt;
var d,a,b,i:integer;
c:string;
begin
read(a,b);
d:=0;
for i:=a to b do
begin
str(i,c);
if c[1]=c[length(c)] then inc(d);
end;
write(d);
readln
end.
do ko có thời gian nên mik khỏi tạo file nhé :v