Cho biết: 3 phần x lớn hơn 3 phần 5. Số các giá trị của x là: ????
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.
Program HOC24;
var d,i,n,x: integer;
t: longint;
a: array[1..32000] of integer;
begin
write('Nhap N: '); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
write('Chi so cac phan tu co gia tri bang 0 la: ');
for i:=1 to n do if a[i]=0 then write(i,' ');
writeln;
d:=0; t:=0;
write('Nhap X: '); readln(x);
for i:=1 to n do if a[i]>x then d:=d+1;
writeln('Co ',d,' phan tu co gia tri lon hon ',x);
if n=20 then
begin
for i:=5 to 20 do t:=t+a[i];
end else write('Du lieu da cho chua du 20 phan tu');
write('Tong cac phan tu co gia tri nam trong doan 5 den 20 la: ',t);
readln
end.
uses crt;
var a:array[1..250]of integer;
i,n,t,x,dem:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
writeln('Chi so cac phan tu co gia tri bang 0 la: ');
for i:=1 to n do
if a[i]=0 then write(i:4);
writeln;
write('Nhap x='); readln(x);
dem:=0;
for i:=1 to n do
if a[i]>x then inc(dem);
writeln('So phan tu lon hon ',x,' la: ',dem);
t:=0;
for i:=1 to n do
if (5<=a[i]) and (a[i]<=20) then t:=t+a[i];
writeln(t);
readln;
end.
bài 4:so sánh
5/2 lớn hơn 3/7
4/3 lớn hơn,3/2 lớn hơn
bài 6:rút gọn các phân số sau:
3/9=1/3 9/12=3/4 8/18=4/9 60/36=10/6 17/34=1/2 17/51=1/3 35/100=7/20 25/100=1/4 8/1000=1/125 24/30=4/5 18/54=1/3 72/42=12/7
đay nhé mk chưa làm hết đc bn viết liền quá mk nhìn khó mà mk hỏi bài 7 là nhân hay cộng vậy?
\(\dfrac{5}{x}=-\dfrac{2}{3}\Rightarrow x=\dfrac{5.3}{-2}=-\dfrac{15}{2}\)
Ta thấy: \(\frac{3}{x}>\frac{3}{5}\)
⇒ x=4,3,2,1(không thể bằng 0)
=> x có 4 giá trị thỏa mãn đề bài