ờ khó thật
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.
Như Mai ơi,mình lên máy tính rồi.Để mình vẽ cho.Giải giúp nhé! 100,5m 30m 40,5m 50m 40,5m 50m
hơi méo mó chút.
Để làm được câu khó thì em cần có nền tảng vững chắc kiến thức cơ bản, luyện tập thường xuyên, các bài, dạng bài cho đến khi thuần thục. Sau đó đưa các dạng bài nâng cao về dạng bài cơ bản để làm.
Bài 51: Cho hai hình vuông ABCD và MNPQ như trong hình vẽ. Biết BD = 12 cm. Hãy tính diện tích phần gạch chéo.
Bài 52: Bạn Toàn nhân một số với 2002 nhưng “đãng trí” quên viết 2 chữ số 0 của số 2002 nên kết quả “bị” giảm đi 3965940 đơn vị. Toàn đã định nhân số nào với 2002?
Bài 53: Người ta cộng 5 số và chia cho 5 thì được 138. Nếu xếp các số theo thứ tự lớn dần thì cộng 3 số đầu tiên và chia cho 3 sẽ được 127, cộng 3 số cuối và chia cho 3 sẽ được 148. Bạn có biết số đứng giữa theo thứ tự trên là số nào không?
Bài 54: Cho bảng ô vuông gồm 10 dòng và 10 cột. Hai bạn Tín và Nhi tô màu các ô, mỗi ô một màu trong 3 màu: xanh, đỏ, tím. Bạn Tín bảo: "Lần nào tô xong hết các ô cũng có 2 dòng mà trên 2 dòng đó có một màu tô số ô dòng này bằng tô số ô dòng kia". Bạn Nhi bảo: "Tớ phát hiện ra bao giờ cũng có 2 cột được tô như thế".
Nào, bạn hãy cho biết ai đúng, ai sai?
Bài 55: Tìm 4 số tự nhiên có tổng bằng 2003. Biết rằng nếu xóa bỏ chữ số hàng đơn vị của số thứ nhất ta được số thứ hai. Nếu xóa bỏ chữ số hàng đơn vị của số thứ hai ta được số thứ ba. Nếu xóa bỏ chữ số hàng đơn vị của số thứ ba ta được số thứ tư.
Bài 56: Một người mang ra chợ 5 giỏ táo gồm hai loại. Số táo trong mỗi giỏ lần lượt là: 20 ; 25 ; 30 ; 35 và 40. Mỗi giỏ chỉ đựng một loại táo. Sau khi bán hết một giỏ táo nào đó, người ấy thấy rằng : Số táo loại 2 còn lại đúng bằng nửa số táo loại 1. Hỏi số táo loại 2 còn lại là bao nhiêu?
uses crt;
const fi='ktt2.inp';
var f1:text;
s:string;
a:array[1..100]of integer;
n,i,x,dem,t,kt,kt1,j,max,kt2:integer;
begin
clrscr;
assign(f1,fi);reset(f1);
readln(f1,n,x);
readln(f1,s);
for i:=1 to n do
read(f1,a[i]);
t:=0;
for i:=1 to n do
if a[i]>1 then
begin
kt:=0;
for j:=2 to a[i]-1 do
if a[i] mod j=0 then kt:=1;
if kt=0 then t:=t+a[i];
end;
writeln('Tong cac so nguyen to la: ',t);
dem:=0;
for i:=1 to n do
if a[i]>1 then
begin
kt1:=0;
for j:=2 to a[i]-1 do
if a[i] mod j=0 then kt1:=1;
if (kt1=0) and (a[i]<x) then inc(dem);
end;
writeln('So luong so nguyen to nho hon ',x,' la: ',dem);
max:=0;
for i:=1 to n do
if a[i]>1 then
begin
kt2:=0;
for j:=2 to a[i]-1 do
if a[i] mod j=0 then kt2:=1;
if (kt2=0) and (max<a[i]) then max:=a[i];
end;
if max=0 then writeln('Khong co so nguyen to nao trong day')
else writeln('So nguyen to lon nhat la: ',max);
write('Xau ',s,' theo thu tu nguoc la: ');
d:=length(s);
for i:=d downto 1 do
write(s[i]);
writeln;
close(f1);
readln;
end.



mày nhảy khá đều đấy
dễ