2. Отыскать творение P=(x+ 1/5)(x+ 4/9) (n мн.). Выполнить ручную трассировку

2. Найти творение P=(x+ 1/5)(x+ 4/9) (n мн.). Выполнить ручную трассировку при х=1, n=3

Задать свой вопрос
1 ответ

Program pr1;

Var x, i,n:Integer; P,a,b: Real;

Begin

P:=1;

a:=0.2;

b:=11/40;

Writeln ('Введите x');

Writeln ('Введите n');

Read (x);

Read (n);

For i:=1 to n do begin

P:=p*(x+(a+b));

a:= a+b;

end;

Write ('P=',P);

End.


, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт