Контрольная по Pascal

Задания выполняются на листе, укажите фамилию и группу. В каждом задании необходимо привести фрагмент программы на Pascal, служащий указанной цели.

1. Объявите переменные a целого типа, b - дробного типа, с - типа байт, d - строкового типа, e - логического типа, f - символьного типа.

2. Есть некоторая процедура P(). Как выполнить эту процедуру 100 раз, задействовав всего 3 строки программного кода?

3. Есть 4 условия:
if A='a' then...
if A='A' then...
if a='a' then...
if a='A' then...

Какие из них всегда будут иметь одинаковое логическое значение?

4. Дана программа
n:=15;
while n>1 do
begin
if n mod 2 = 0 then
  n:=n div 2
else
  n:= 3*n+1;
  Writeln(n);
end;

Какие числа выведет эта программа на экран?

5. Какое максимальное значение может храниться в переменной типа байт?