Составить блок-схему алгоритма и программу на алгоритмическом языке. Язык Паскаль ( любой )

var   x,y,Z:real;   i,n:integer; begin   Write('Введите количество чисел n: '); Readln(n);   Z:=0;   for i:=1 to n do   begin     Write('Введите значения x и y: '); Readln(x,y);     Z:=Z-sqr(x+y)/i   end;   Writeln('Z=',Z) end. Тестовое решение: Введите количество чисел n: 5 Введите значения x и y: 3 4.2 Введите значения x и y: 2.17 3.95 Введите значения x и y: 5.11 1.54 Введите значения x и y: 6.6 7 Введите значения x и y: 1.15 1.19 Z=-132.643153333333 Блок-схема находится во вложении.