Задача. Даны натуральное число n и вещественные числа a1, a2, ..., an. Определить сумму квадратов вещественных чисел. Выберите те операторы, которые подходят для решения этой задачи. Var N,i: integer; S, a:real; Var N,S,a,i: integer; Begin Read (N); S:=1; S:=0; For i:= 1 to 20 do For i:= 1 to N do Begin Read (a); S:=S+a; S:=S+a*a; End; Write (S); End.
Задание

Задача.
Даны натуральное число n и вещественные числа a1, a2, ..., an. Определить сумму квадратов вещественных чисел.

Выберите те операторы, которые подходят для решения этой задачи.

  • Var N,i: integer;
    S, a:real;
  • Var N,S,a,i: integer;
  • Begin
  • Read \(N\);
  • S:=1;
  • S:=0;
  • For i:= 1 to 20 do
  • For i:= 1 to N do
  • Begin
  • Read \(a\);
  • S:=S+a;
  • S:=S+a*a;
  • End;
  • Write \(S\);
  • End.