Pascal 無引數過程，可以 Pascal 中的函式和過程不定義表單引數或值引數

1l不老...

過程可以是沒有引數的（不像函式），就像一般的dp（動態量規）是沒有引數的，只呼叫過程，給它加上幾個區域性變數，動態量規方程中要用的變數定義應該在整體變數中。

PS：3樓和4樓都沒問題，程式名稱不能與功能或程序相同。 因為無引數程序不需要重複呼叫，所以如果寫在主程式中也不會有任何效果，確實是偏好問題。

當然，LZ 可以根據個人喜好將偏執過程更改為主程式。

如果出現問題，則程式名稱與程序名稱相同，並刪除程式頭。

當然，這取決於需要，沒有必要引入引數。

當然，你可以，而且你可以（但不是必須）省略末尾的括號。

是的，如果不需要，可以省略定義表單或值引數的部分。

全過程變數：全域性變數，程式中任意位置都可以訪問的變數區域性變數：在程式中，只能在特定程序或函式中訪問的變數值引數：只傳遞數值，在程序（函式）中對其所做的更改不會導致原始變數值發生變化。

變數引數：傳遞乙個數值，在過程（函式）中對此引數所做的所有更改都將返回到原始變數。

當變數引數在程序中操作時，原始變數的值會發生變化，而 value 引數只是複製乙個變數的值並傳遞給程序，傳入後與它無關。

是乙個變數，（變數），格式：var（形式引數）:(type）;或 var（形式引數 1，形式引數 2,......形式引數 n） :(type）;

var a:integer;

b:real;

c,d,e:shortint;

這是問題所在：

var a:extended;

Open floating-point） 正確：

var a:extended;

換人參！ 它是乙個區域性變數，未輸入的程序是乙個隨機數。

var 定義變數;

在常量之後定義的是乙個常量。

例如var a，b：整數;

const c=100;

a、b 是整數變數，c 是值為 100 的常量。

var 被定義為變數。

x：integer 是乙個形式引數，它是傳遞值的，無論你在過程中如何改變它的值，都不會影響外部變數; var x：integer 是乙個引數，在此過程中更改其值會影響外部變數。

例如var a，b：整數;

procedure proc(a:integer; var b:integer);

begina:= a * 2;

b:= b * 2;

end;begin

a:=1;b:=1;

proc(a, b);

writeln(a);

writeln(b);

end.輸出： 1

2.如果你不明白，你可以問我：791066719，我習慣使用QQ。

過程和函式中的變數引數與主程式中的變數相同，唯一的區別是過程和函式中的變數只能在程式和函式中使用，在其他地方無效，變數名（例如x）不應與主程式中的變數名相同。

a。value 引數是前面沒有 var 後面有型別描述的引數，引數的值傳遞給引數的值，value 引數的操作不會改變引數變數的值。

另一方面，前面有var，後面有型別描述的引數是變數引數，引數的位址傳遞給變數引數，變數引數的運算等同於引數的直接運算。

有機人參是一種在有機環境中種植的人參，不使用合成肥料和殺蟲劑。 現在最好的有機人參要做的就是加乙個人賣人參，天貓上有一家***賣有機人參的店，目前正在打動前期的調侃，大家可以了解一下。 至於人參怎麼吃好，就看個人喜好了，吃法也很多，可以在網上搜尋一下。

沒有必要使用快速電源。

vari: longint;

t, k: longint;

flag: boolean;

v: array [0..1000] of longint;

beginread(k);

t := k;

flag := false;

if t >= 1000 then

beginflag := true;

t := t mod 1000;

end;k := 1;

fillchar(v, sizeof(v), 255);

for i := 0 to 10000 dobegin

if flag and (i <>0) thenbegin

if v[k] <1 then

beginwriteln(i + v[k]);

break;

end;v[k] := i;

end;k := k * t;

if k >= 1000 then

beginflag := true;

k := k mod 1000;

end;end;

end.