1樓：
1、var
n,i:integer;
begin
n:=0; i:=0;
repeat
i:=i+1;
if (i mod 2=1)and(i mod 3=1)and(i mod 5=1) then begin
write(i,' '); n:=n+1;
end;
until n=10;
end.
2、var i:integer;
begin
for i:=1 to 500 do
if (i mod 3=2)and(i mod 5=3) and (i mod 7=2) then write(i,' ');
end.
3、var
i:integer;
begin
i:=0;
repeat
i:=i+1;
until (sqrt(i+100)=trunc(sqrt(i+100)))and(sqrt(i+168)=trunc(sqrt(i+168));
writeln(i);
end.
先給你3題,剩下的找我qq，353****29，我已經給你加好友了，驗證碼是zhidao.baidu.com
我每天大概11:30~13:20上線
2樓：匿名使用者
假設三角形abc
首先連線三個邊的中點，這樣就把一個等邊三角形平分成了四分，我們只要把其中一個小三角形再分成三份就可以了。
取一個小三角形，做出三條邊的高，三個高交於一點，假設是o點，那麼點小三角形的兩個頂點和點o的連線所圍成的三角形就是小三角形的三分之一，所以也就是整個大三角形的是二分之一。
X不大於Y且X為奇數pascal簡單程式設計
你好，該題用if好 程式如下 program xy varx,y integer begin readln y for x 1 to y do if x mod 2 1 then write x,end.祝你成功。用 if 語句 if x y and odd x then 或if x y and x...
學校舉行數學知識競賽,共15道題,答對一道題得10分,答錯或不答題扣2分。小明得了102分，答對了多少題
如果全部答對，得分為15x10 150分。而打錯或不答，會使得總分減少 10 2 12分。小明減少了 150 102 48分。所以他 答錯或者不答了 48 12 4道。答對了 15 4 11道。很高興為你解答，希望能夠幫助到你。基礎教育團隊祝你學習進步！不理解就追問，理解了請採納！設小明答對x道題，...
3道c語言程式設計題希望你們能幫助我
1.include int main for m 1 m n 2 m printf d n count 2.include include int main printf yes n 3.include int main printf d n count 幾道c語言題目,我沒分了,希望你們能幫助我,...