Заполнить линейный массив по формуле: c[i]=6*x-i/7-6;

Question

Заполнить линейный массив по формуле: c[i]=6*x-i/7-6;

Comments

Сколько элементов в массиве?

---

Или число элементов вводится с клавиатуры?

---

С клавиатурой

Answer 1

program raf105;

var c:array[1..999] of real;

i,x,n:integer;

begin

write('Введите количество элементов массива: ');

readln(n);

write('Введите значение X: ');

readln(x);

writeln('Элементы массива:');

for i:=1 to n do

begin

 c[i]:= 6*x-i/7-6;

 writeln(c[i]);

end;

end.

     

Язык программирования PascalABC