[Тигрозавр]

Помогите, программисты, сдать сессию=)Нужно решить несколько задачек по delphi.
1)Найти площадь сектора, радиус которого равен 13.7, а дуга содержит заданное число радиан (фи) .
2)Даны натуральное n, символы S1, ... ,Sn .Известно, что среди S1, ... ,Sn есть по крайней мере одна запятая. Найти такое натуральное i, что Si - последняя по порядку запятая.
3)var A: array [1..5] of integer;
B: array [1..6] of boolean;
По массиву A получить массив В, присвоив его k-му элементу значение true, если выполнено условие: все элементы k-го столбца массива A нулевые, и значение false иначе.