Пожалуйста помогите решить задачу на Pascal

[serafima_92]

Известен план выпуска компьютеров и количество выпущенных компьютеров тремя фирмами за шесть месяцев. Определить для каждой фирмы, был ли выполнен план по итогам шести месяцев.

[kakawkin]

аподобее этого:

program tt;
var a,b,c:integer;
begin
 write('По плану: ');readln(a);
 write('Выполнили: ');readln(b);
 if a>b then
         begin
          c:=a-b;
          writeln('Невыполнили на',c,' штук');
         end;
 if a=b then
         begin
          writeln('Уложились точно в план');
         end;
 if a<b then
         begin
          c:=b-a;
          writeln('План превыполнен на ',c,' штук');
         end;
readln;
end.

[serafima_92]

Эта задача на тему массивы, не могли бы вы помочь ее решить с массивами

[Stilet]

serafima_92

Наработки есть? Что про массивы тебе уже извесно?

[serafima_92]

Известно, только ничего не понятно...
Нахождение суммы (произведения) элементов массива;
• Определение наибольшего (наименьшего) элемента в массиве;
• Нахождение количества элементов массива, удовлетворяющих определенным условиям:
• Упорядочение массива в порядке возрастания (убывания) элементов.