|
@@ -30,7 +30,7 @@ VAR P, n, err: INTEGER;
|
|
s: ARRAY 50 OF CHAR;
|
|
s: ARRAY 50 OF CHAR;
|
|
BEGIN
|
|
BEGIN
|
|
Out.String('Введите P: '); In.Int(P);
|
|
Out.String('Введите P: '); In.Int(P);
|
|
- Out.String('Введите чисор в '); Out.Int(P, 0);
|
|
|
|
|
|
+ Out.String('Введите число в '); Out.Int(P, 0);
|
|
Out.String('-ичной системе счисления: '); In.Line(s);
|
|
Out.String('-ичной системе счисления: '); In.Line(s);
|
|
n := Convert(s, P, err);
|
|
n := Convert(s, P, err);
|
|
IF err = -1 THEN
|
|
IF err = -1 THEN
|