Помогите плизз!!!По английскому языку!!!Задали написать три вопроса для музыкальной радио программы

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

Паскаль помогите пжл!!!!!!

Дан одномерный массив, состоящий из  вещественных элементов. Найти произведение элементов массива, расположенных между максимальным и минимальным элементами.

Дан одномерный массив, состоящий из  вещественных элементов. Найти произведение элементов массива, расположенных между максимальным по модулю и минимальным по модулю элементами

ну или исправьте мое пжл

program fgf;
var mas:array[1..100] of real;
max,min:real;
i,n,c,b:shortint;
p:real;
f1,g:text;
begin;
assign (f1, 'input.txt');
reset (f1);
readln (f1, n);

for i:=1 to N do read (mas[i]);
max:=mas[i];
for i:=2 to N do begin
if mas[i]>max then begin
max:=mas[i];
c:=i;
end;
end;
min:=mas[1];
for i:=2 to N do begin
if mas[i]<min then begin
max:=mas[i];
b:=i;
end;
end;
close(f1);
assign (g, 'output.txt');
rewrite (g);
p:=1;
if b<c then I:=b+1 and c-1

else for I:=c+1 to b-1 do p:=p*mas[i];

if (n<3) or (b+1=c) or (c+1=b) then writeln(g,'0.00') else write(p:3:3) ;

close (g);
end.

в поезде Москва-Тольятти 17 вагонов Из них 6 вагонов плацкартные а остальные купейные В каждом плацкартном вагоне 54 места а в купейном-36 мест. На этот поезд уже продано 87 билетов в плацкартные вагоны а в купейные-в 3 раза больше билетов чем в плацкартные. Поставь разумные вопросы к этому условию и ответь на них ?