0_0_15032906_377.cpp:2:11: error: too many decimal points in number
arr=array[0..1000] of longint;
^
0_0_15032906_377.cpp:5:9: error: too many decimal points in number
c:array[0..100] of arr;
^
0_0_15032906_377.cpp:1:1: error: 'type' does not name a type
type
^
0_0_15032906_377.cpp:3:1: error: 'var' does not name a type
var
^
0_0_15032906_377.cpp:5:2: error: found ':' in nested-name-specifier, expected '::'
c:array[0..100] of arr;
^
0_0_15032906_377.cpp:5:1: error: 'c' does not name a type
c:array[0..100] of arr;
^
0_0_15032906_377.cpp:6:1: error: 'a' does not name a type
a,b:arr;
^
0_0_15032906_377.cpp:8:1: error: 'procedure' does not name a type
procedure adjust(var x:arr);
^
0_0_15032906_377.cpp:9:1: error: 'var' does not name a type
var i:longint;
^
0_0_15032906_377.cpp:10:1: error: 'begin' does not name a type
begin
^
0_0_15032906_377.cpp:14:5: error: 'x' does not name a type
x[i]:=x[i] mod 10;
^
0_0_15032906_377.cpp:15:3: error: 'end' does not name a type
end;
^
0_0_15032906_377.cpp:16:3: error: expected unqualified-id before 'while'
while (x[x[0]]=0)and(x[0]>1) do dec(x[0]);
^
0_0_15032906_377.cpp:17:1: error: 'end' does not name a type
end;
^
0_0_15032906_377.cpp:19:1: error: 'function' does not name a type
function mul(x,y:arr):arr;
^
0_0_15032906_377.cpp:20:1: error: 'var' does not name a type
var i,j:longint;
^
0_0_15032906_377.cpp:21:1: error: 'begin' does not name a type
begin
^
0_0_15032906_377.cpp:23:3: error: 'mul' does not name a type
mul[0]:=x[0]+y[0];
^
0_0_15032906_377.cpp:24:3: error: expected unqualified-id before 'for'
for i:=1 to x[0] do
^
0_0_15032906_377.cpp:27:9: error: expected constructor, destructor, or type conversion before '(' token
adjust(mul);
^
0_0_15032906_377.cpp:28:1: error: 'end' does not name a type
end;
^
0_0_15032906_377.cpp:30:1: error: 'function' does not name a type
function chu(x:arr;tmp:longint):arr;
^
0_0_15032906_377.cpp:30:23: error: found ':' in nested-name-specifier, expected '::'
function chu(x:arr;tmp:longint):arr;
^
0_0_15032906_377.cpp:30:20: error: 'tmp' does not name a type
function chu(x:arr;tmp:longint):arr;
^
0_0_15032906_377.cpp:31:1: error: 'var' does not name a type
var i,ret:longint;
^
0_0_15032906_377.cpp:32:1: error: 'begin' does not name a type
begin
^
0_0_15032906_377.cpp:34:3: error: expected unqualified-id before 'for'
for i:=x[0] downto 1 do
^
0_0_15032906_377.cpp:37:5: error: 'chu' does not name a type
chu[i]:=ret div tmp;
^
0_0_15032906_377.cpp:38:5: error: 'ret' does not name a type
ret:=ret mod tmp;
^
0_0_15032906_377.cpp:39:3: error: 'end' does not name a type
end;
^
0_0_15032906_377.cpp:40:3: error: 'i' does not name a type
i:=x[0];
^
0_0_15032906_377.cpp:41:3: error: expected unqualified-id before 'while'
while (chu[i]=0)and(i>1) do dec(i);
^
0_0_15032906_377.cpp:42:3: error: 'chu' does not name a type
chu[0]:=i;
^
0_0_15032906_377.cpp:43:1: error: 'end' does not name a type
end;
^
0_0_15032906_377.cpp:45:1: error: 'begin' does not name a type
begin
^
0_0_15032906_377.cpp:46:13: error: 'c' does not name a type
c[0,1]:=1;c[0,0]:=1;
^
0_0_15032906_377.cpp:47:3: error: expected unqualified-id before 'for'
for i:=0 to 99 do
^
0_0_15032906_377.cpp:50:4: error: 'p2' does not name a type
p2:=i+2;
^
0_0_15032906_377.cpp:51:12: error: expected constructor, destructor, or type conversion before '(' token
fillchar(a,sizeof(a),0);
^
0_0_15032906_377.cpp:52:12: error: expected constructor, destructor, or type conversion before '(' token
fillchar(b,sizeof(b),0);
^
0_0_15032906_377.cpp:53:4: error: expected unqualified-id before 'while'
while p1>0 do
^
0_0_15032906_377.cpp:56:5: error: 'a' does not name a type
a[a[0]]:=p1 mod 10;
^
0_0_15032906_377.cpp:57:5: error: 'p1' does not name a type
p1:=p1 div 10;
^
0_0_15032906_377.cpp:58:4: error: 'end' does not name a type
end;
^
0_0_15032906_377.cpp:59:5: error: 'c' does not name a type
c[i+1]:=mul(c[i],a);
^
0_0_15032906_377.cpp:60:5: error: 'c' does not name a type
c[i+1]:=chu(c[i+1],p2);
^
0_0_15032906_377.cpp:61:3: error: 'end' does not name a type
end;
^
0_0_15032906_377.cpp:62:3: error: expected unqualified-id before 'while'
while true do
^
0_0_15032906_377.cpp:65:4: error: expected unqualified-id before 'if'
if n=-1 then halt;
^
0_0_15032906_377.cpp:66:4: error: expected unqualified-id before 'for'
for i:=c[n][0] downto 1 do
^
0_0_15032906_377.cpp:68:4: error: 'writeln' does not name a type
writeln;
^
0_0_15032906_377.cpp:69:3: error: 'end' does not name a type
end;
^
0_0_15032906_377.cpp:70:1: error: 'end' does not name a type
end.
^
|