1000 рублей тому, кто поможет с информатикой

Требуется написать 5 простых программ по информатике (еще одну только отредактировать) , потом объяснить их мне. Пишутся в Delphi в консольном режиме. Выложил как пример 3 из них. Я информатику знаю почти на нуле, поэтому даже такие простые пока не могу написать. Могу прислать практикум по программированию, откуда я брал задачи. Там есть схожие. Пишите на почту или звоните на номер
8 (915) 2290035