Найдите закономерности и продолжите последовательности: 1,4,9,16....

Кбайтах.

Условие: Яркости пикселей рисунка закодированы числами от 0 до 255 в виде матрицы. Преобразовать рисунок в чёрно-белый по следующему алгоритму:
1) вычислить среднюю яркость пикселей по всему рисунку
2) все пиксели, яркость которых меньше средней, сделать чёрными, (записать код 0), а остальные - белыми (код 255)

program lyly;
const n=4;
var a:array[1..n,1..n] of integer;
i,j,s:integer;
sr:real;
begin
for i:=1 to n do
begin
for j:=1 to n do
begin
a[i,j]:= random (256);
write (a[i,j]:5);
end;
writeln
end;
begin
s:=0;
s:=s+a[i,j];
sr:=s/(n*n);
writeln;
writeln('Средняя яркость',sr);
end;
begin
writeln;
writeln ('Результат:');
if a[i,j] a[i,j]:=255;
end;
end.

скиньте файлом

D:\МЛЕКОПИТАЮЩИЕ\ХИЩНИКИ\МЕДВЕИ\панды. txt

D:\МЛЕКОПИТАЮЩИЕ\ХИЩНИКИ\МЕДВЕДИ\бурый медведь.txt

D:\МЛЕКОПИТАЮЩИЕ\ХИЩНИКИ\гепарды. txt

D:\МЛЕКОПИТАЮЩИЕ\ПАРНОКОПЫТНЫЕ\свиньи. txt

D:\МЛЕКОПИТАЮЩИЕ\ПАРНОКОПЫТНЫЕ\олени. txt

D:\МЛЕКОПИТАЮЩИЕ\ПАРНОКОПЫТНЫЕ\бегемоты. txt

D:\МЛЕКОПИТАЮЩИЕ\ГРЫЗУНЫ\бобры.txt

D:\МЛЕКОПИТАЮЩИЕ\сумчатые.txt

Изобразите соответствующую файловую структуру.

...

г)о, д, т, ч, п, ...

д)Москва, Абакан, Норильск, Киев, ...

а) а,б,в,г.....
б) а,в,д,е....
в) Анна, Борис,Валентина, Геннадий...
г) Москва, Абакан, Норильск, Киев.....

найдите закономерность и продолжите последовательности:
а) о, д, т, ч,п,...
б) Москва, Абакан, Норильск, Киев,...

а)а,б,в,г,...;
б)а,в,д,ё,...;
в)1,4,9,16,...;
г)112,113,114,212,213,214,...
д)о,д,т,ч,п,... .