Привет всем!

[~Санёк~]

Помогите пожалуйста с решением задач! никак не могу решить.
1. Составить программу, вычёркивающую все буквы "о" из данного слова. Контрольный вариант:1)солома 2)просто.
2. Вычислить N!, N - натуральное число. Контрольный вариант: N=5.
Решить необходимо в Delphi 7.

[Chudo4258]

Вычислить N!, N - натуральное число. Контрольный вариант: N=5.
Решить необходимо в Delphi 7.

Эту задачу поищи в инете, по-моему это самая распостранненая задача на рекурсию.

[Chudo4258]

Составить программу, вычёркивающую все буквы "о" из данного слова. Контрольный вариант:1)солома 2)просто.

Проходишь по вселу слову:

for i:=1 to lenght(d) do

если i-ый симлол ="о", то

s[i]:=s[i+1]