Arthur Yefimov 3 lat temu
rodzic
commit
6a11a81e01
1 zmienionych plików z 1 dodań i 1 usunięć
  1. 1 1
      Programs/Numeral.Mod

+ 1 - 1
Programs/Numeral.Mod

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