Задачи на Pascal

[KiLLAS]

Подскажите пожалуйста решение следующих задач:
1. Составить программу для определения подходящего возраста кандидатуру для вступления в брак, используя следующее соображение: возраст девушки равен половине возраста мужчины плюс 7, возраст мужчины определяется соответственно как удвоенный возраст девушки минус 14. Данные для проверки работы задать самостоятельно.

2. Одноклеточная амеба делится каждые 3 часа на 2 клетки, определить сколько клеток будет через 3,6,9,12....24 часа?

[Don Karleone]

№ 2

I:=1;
J:=0;
while J < 24 do
  begin
    Inc(J,3);
    I:=I*2;
    writeln('через ',J,' ч. - ',I);
  end;

[KiLLAS]

люди помогите решить первую задачу....