Сформировать массив b b1:=sin1, b2:=cos2, b3:=sin3, b4:=cos4 n=10

Question

Информатика

Агафения

4 ноября, 08:13

Сформировать массив b b1:=sin1, b2:=cos2, b3:=sin3, b4:=cos4 n=10

+1

Ответы (1)

Знаете ответ?

Онори · Answer 1

Const

n = 10;

var

b: array [1 ... n] of real;

i: byte;

begin

for i : = 1 to n do

begin

b[i] : = cos (i) ;

writeln ('b[', i,'] = ', b[i]) ;

end;

end.