Question

Даю 50 баллов, помогите пожалуйста!!!

1. Составьте блок-схему алгоритма и программу на языке программирования Паскаль: вычисления произведения целых чисел из промежутка [-6; 5).

2. Составьте программу на языке программирования Паскаль расчета значений функции
у = 5x^2 - 2х +1 на отрезке [-5; 5] с шагом h = 2.

​

Answer 1

1) var i,p:integer;

begin

p:=1;

for i:=-6 to 5 do

p:=p*i;

writeln('Произведение = ',p);

end.

2) const b=2;

var y,x:real;

begin

x:=-5;

while(x<=5) do

begin

y:=5*sqr(x)-2*x+1;

writeln('При х = ',x,' y = ',y);

x:=x+2;

end;

end.