СРОЧНО! Запишите результат выполнения программы:var s,a: string;i: byte;begins:= '1234'; a:='b';for i:= length(s) downto 1 do begina:= a + s[i] ;write(a);end;end.
Выведет: b4b43b432b4321