Пожалуйста,решите и срочно!
1)Составить программу для вычисления суммы 2sqrt(2)+2sqrt(4)+2sqrt(6)+...+2sqrt(12).
2) .Для заданной функции y=sqrt(x^3)
а)напечатать табл.значение изменяя от 3 до 33;
б)вычислить сумму полученных значений
3.)составить алгоритмы вычисления произведения чисел от 51 до 1
Заранее спасибо!

1

Ответы и объяснения

2014-01-16T18:33:35+00:00
1)
program chik1;
var s:real;
a:integer;
begin
a:=0;
while a<12 do
begin
a:=a+2;
s:=s+2*sqrt(a);
end;
writeln(S);
end.
2)
program chik2;
var s,y:real;
a:integer;
begin
a:=2;
while a<33 do
begin
a:=a+1;
y:=sqrt(a*a*a);
s:=s+y;
writeln(y);
end;
writeln(S);
end.
3)program chik3;
var i:longint;
p:real;
begin
p:=1;
for i:=1 to 51 do
begin
p:=p*i;
end;
writeln(p);
end.