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

Question

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

Answer 1

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

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

Comments

ЕЩЁ РАЗ огромное спасибо)))

---

))