teratail header banner
teratail header banner
質問するログイン新規登録

回答編集履歴

2

追加

2020/09/24 06:35

投稿

amiya
amiya

スコア1218

answer CHANGED
@@ -14,4 +14,8 @@
14
14
  end;
15
15
  ```
16
16
 
17
- みたいな感じに。
17
+ みたいな感じに。
18
+
19
+ 今ではDelphiがPascalを採用しています。
20
+ 大幅に拡張されてて、最近は上のルールを外れて、
21
+ 関数内部でも型宣言が可能になっちゃったみたいだけれども。

1

修正

2020/09/24 06:35

投稿

amiya
amiya

スコア1218

answer CHANGED
@@ -7,6 +7,7 @@
7
7
  x:Integer;
8
8
  sum:Integer;
9
9
  begin
10
+ sum := 0;
10
11
  for x:=0 to n do
11
12
  sum := sum + x;
12
13
  result := sum;