Протабулировать (найти значение функции) y=x³ на отрезке [3; -3] с шагом 0,5. составить программу по блок-схеме ​

var x, y : integer ;

begin

x: =3;

y: =sqr(x)*x;

while x> =-3 do

begin

writeln ('x=', x: 3,'y=',y);

x: =x-0,5;

y: =sqr(x)*x;

end;

end.

а)домащняя библиотека

в виде таблицы

1.номер

2.название

3.автор

4.полка

б)1.номер

2.слово

3.вопрос

4.род

5.число

6.падеж

в)1.номер

2.имя

3.фамилия

4.отчество

5.телефон

6.адрес

7.дата рождения

8.хобби

в цикле sum [i]: =sum+mas[i,j];