Developing.ru

Написать программу, которая вводит символьный массив из 11-ти или меньшего количества элементов и заменяет в нем все точки и запятые знаком "%".

for i:=1 to 11 do if (s='.' or s=',') then s:='%'