Паскаль

Паскаль
Помогите сделать эту задачу, у самого бред получается не шарю в я этом пытался сделать по аналогии другого варианта, но нечего не вышло не понимаю( вот что вышло у меня:Program zzz;
uses ctr;
var
M:array [1..7] of integer;
i,sum:integer;
begin;
clrscr;
sum:=0;
writeln('Введите массивы: ');
for i:=1 to 7 do begin
read (M);
sum:=sum+sqr(M
);
дальше незнаю как да и это полным бредом наверно покажется знающим людям. Учусь на 1 курсе в вузе, в школе информатики не было вообще. Отчитали лекции нам, посадили за компы, а я паскаль этот в первый раз и увидел на первом же занятии... Пытаюсь вникнуть но не особо получается. Прошу помощи)

  • Изучить паскаль в степени, достаточной для выполнения этого задания, можно где-то часа за 3, если взять почитать что-нибудь дельное. Вот например.
    А сделать за тебя конечно можно, но ведь когда-нибудь будет зачет. Кто его вместо тебя сдавать будет?