Даны натуральное число n, действительные числа a₁, a₂, ..., $a_{n}$ . Написать программу на языке программирования Pascal для вычисления $sqrt{a ^{2} _{1} + a^{2} _{2} +... + a^{2} _{n} }$

Question

Информатика

Hiisok

5 год назад

Даны натуральное число n, действительные числа a₁, a₂, ..., $a_{n}$ . Написать программу на языке программирования Pascal для вычисления $sqrt{a ^{2} _{1} + a^{2} _{2} +... + a^{2} _{n} }$

ОТВЕТЫ

Егор

Oct 24, 2020

begin
var n:=ReadInteger('n=');
Writeln('Вводите a1, a2, ...: ');
Writeln(sqrt(ReadSeqReal(n).Select(x->x*x).Sum))
end.

n= 4
Вводите a1, a2, ...:
3 2.5 6.1 -5.2
8.9162772500635

891

Даны натуральное число n, действительные числа a₁, a₂, ..., . Написать программу на языке программирования Pascal для вычисления

Даны натуральное число n, действительные числа a₁, a₂, ..., $a_{n}$ . Написать программу на языке программирования Pascal для вычисления $sqrt{a ^{2} _{1} + a^{2} _{2} +... + a^{2} _{n} }$