Приведенная программа на Паскале реализует алгоритм - Ответ на вопрос по информатике №1272495

Вопрос

Приведенная программа на Паскале реализует алгоритм поразрядного умножения числа на число от 0 до 9, вводимых с клавиатуры приведена с ошибкой. Найдите ее.const m=…;var a, rez: array [1..m] of byte; i, n, x, k: integer; stroka: string;begin readln (stroka); readln (x); n:= length (stroka); for i:=1 to n do val (copy(stroka, i, 1), a[i], k); for i:=1 to n do rez[i]:= a[i] * x; for i:=n downto 2 do begin rez[i-1]:= rez[i-1]+rez[i] mod 10; rez[i]:= rez[i] div 10; end for i:=1 to n do write (rez[i]);end.

• неверно:rez[i-1]:= rez[i-1]+rez[i] mod 10. Правильно:rez[i-1]:= rez[i-1]+rez[i] div 10
• неверно:val(copy(stroka, i, 1), a[i], k). Правильно:str(copy(stroka, i, 1), a[i], k)
• неверно: rez[i]:= rez[i] div 10. Правильно:rez[i]:= rez[i] mod 10
• неверно:for i:=n downto 2 do. Правильно:for i:=2 to n do

Ответ