|
помогите составить программу на Паскале
|
|
|
Составить программу на Паскале для вычисления у=pi/sqrt{2х}/3 х от -5 до +5 с шагом 0,2(Предусловие While)
|
|
|
|
var
i:integer;
y:real;
begin
i:=-5;
while i<>5 do begin
y:=y+(pi/((sqrt(2*i))/(3*i)));
i:=i+0.2;
end;
writeln(y);
end.
"Спасибо" принимается в виде повышения репутации ( Зелёный плюсик:) ).Спасибо
Нужна помощь? Сюда: vkontakte.ru/berestovskiy
|
|
|
|
