用free pascal編譯程序,請各位幫幫忙,要對的,最好快一點,高分懸賞,有兩道題,會多少是多少

2022-11-10 14:20:08 字數 1114 閱讀 7531

1樓:

(1)program prsssoject1;

varn:integer;

procedure find(n:integer);

vari:integer;

begin

if n<>2 then

for i:=2 to n div 2+1 dobegin

if n mod i=0 then

begin

writeln(n,'=',i,'*',n div i);

exit;

end;

end;

writeln('no answer!' );

end;

begin

readln(n);

find(n);

readln;

end.

varhash:array[1..60000 ]of boolean;

n,i,x:longint;

begin

readln(n);

fillchar(hash,sizeof(x),false);

for i:=1 to n do

begin

read(x);

hash[x]:=true;

end;

for i:=60000 downto 1 doif hash[i] then

begin

writeln('max=',i);break;

end;

for i:=1 to 60000 do

if hash[i] then

begin

writeln('min=',i);break;

end;

readln;

readln;

end.

2樓:匿名使用者

改成簡體中文。

引用句子,輸入時不能直接打字,不然會變亂碼,在windows下打好字,複製,在fp中選edit\paste from windows粘上去就行了。

注:漢字佔兩個位元組,粘好後,把游標往後移到位再打,不然也是亂碼。

如果開變數,用string,在簡體中文下編譯好後,直接打就行。

怎樣用c語言編譯,怎樣用c語言編譯

編譯c語言程式步驟為 採用vi進行源 編寫,編寫完成後,wq存檔退出,如 vi test.c 在命令列下,執行gcc編譯程式,生成執行碼,如 gcc o test test.c o 表示指明生成的執行碼名稱 執行編譯後的執行碼 test 怎樣用記事本編寫c語言程式 並編譯 1 先在系統變數或使用者變...

用free pascal幫我完成以下練習!!急

no.1 vara,b,c integer begin a 1 b 12 c 123 writeln a writeln b writeln c writeln writeln a 3 writeln b 3 writeln c 3 end.no.2 varn,i integer begin rea...

現在編譯c語言用什麼工具,現在編譯C語言用什麼工具?

windows常用的有vc vs,linux上常用的是gcc。其它各式各樣的ide基本都是建立在這兩個編譯基礎上的,比如devc 它是依靠的gcc。一般來說初學者,在windows平臺上可以使用vc6.0,因為佔用資源少,在linux平臺上可以使用vim gcc,vim用做編輯器,gcc用做編譯器。...