да ладно вам.........короче.......создавайте муждународный суд все.......
Меня он забанил без оснований обвинений.
ГРУСТНЫЙ ОПЫТЯ сделал опыт.Он печален.Чужой останется чужим.Пора домой;залив зеркален,Идет весна дверям моим.Ещё одна весна.Быть может.Уже последняя.Ну,что ж,Она постичь душе поможет,Чем дом покинутый хорош.Имея свой,не строй другого.Всегда довольствуйся одним.Чужих освоить бестолково:Чужой останется чужим.апреля 1936.
function zamena (strz string) stringvar value, dval real;s,s1 string;beginval(strz, value);dval:=frac(value )value:=int(value);str(value,s);str(dval,s1);zamena:=s+'rub.'+s1+'fop';end;эта функция заменяет любое вхождение вида 3,8 грн.на грн.80 коп.таким образом тебе просто надо пробегаться по купить подарок сувенир строке помощью функции pos искать все грн число менять их помощью insert на результат вышеуказанной функции.
Мастера спорта по латиноамериканским танцам Игорь Татьяна Кузьменко приглашают Вас на групповые индивидуальные занятия.Вас ждут: -уютный зал кондиционером-удобные раздевалки-красивая музыка;А также: постановка танца на любые мероприятия, мастер-классы для спортивных пар.
ахахах терминатор победит :))) верю.
да ладно вам.........короче.......создавайте муждународный суд все.......