Помогиите пожалуйста срочно((
Для заданных с клавиатуры значений переменных x и n вычислить
Y = -x + 4x - 9x + ... - 81 x..
(Программирование циклических алгоритмов с заданным
числом повторений в Pascal ABC)
Var
sgn,i:integer;
X,Y:real;
begin
Write(Введите Х: ); Read(X);
Y:=0; sgn:=-1;
for i:=1 to 9 do
begin
Y:=Y+sgn*sqr(i)*X;
sgn:=-sgn
end;
Writeln(Y=,Y)
end.
Тестовое решение:
Введите Х: 3.184
Y=-143.28
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
