Question

Дан массив Х из 10 вещественных чисел. Сформировать массив Y, в котором каждый элемент y=0.5*sqr(x[i]). Исходный и полученный массив вывести на экран в виде 2-х параллельных столбцов.
​

Answer 1

===== PascalABC.NET =====

begin

 var X := ReadArrReal(10);

 var Y := X.Select(p -> 0.5 * Sqr(p)).ToArray;

 for var i := 0 to X.High do

   Writeln(X[i]:20:5, Y[i]:25:5)

end.