Question

Элементы массива вычисляются по формуле: В ( i ) = sin i + cos i. Написать программу, которая выводит значения сорока элементов этого массива в строчку.

Answer 1

const
n=40;
var
a:array[1..n] of real;
i:integer;
begin
for i:=1 to n do
begin
a[i]:=sin (i) + cos (i);
write(a[i],' ');
end;end.