Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

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

Блок-схема находится во вложении.