2 Задачки (Delphi)

[marsius]

Привет Всем ! Помогите мне решить задачи и опишите в проге некоторые моменты действий, то у меня учитель очень придирчивый



1) Заменить все цифры 7 на 8 и удалить из записи единицы.

Например: N: а=17518 и должно получиться 8588

2) дано предложение. В каждом слове подсчитать kol букв, совпадающей с последней в слове.

[Stilet]

1) Заменить все цифры 7 на 8 и удалить из записи единицы.

Ну преврати в строку число потом в цикле по каждому символу проходи и заменяй что надо:

 if s[i]='7' then s[i]:='8'

где s - строка
i - счетчик цикла.

Или заменяй все функой StringReplace.