Pascal и алгоритм.Напишите хоть одно,что-то умоляю!!

Ответ:

var sum,n,m,x: integer;

begin

sum:= 0;

for n:= 0 to 3 do

 for m:= 0 to 4 do

   begin

     Read(x);

     sum:= sum + x;

   end;

Write(sum);

end.

Объяснение: