Предмет: Информатика,
автор: bound2
Паскаль
9 класс
7 задача!
Приложения:
Ответы
Автор ответа:
0
var n:integer;
var x,P:Real;
begin writeln ('введите x');
Readln(x);
P:=1;
for n:=1 to 6 do P:=P * (x-(power (2,n)-1))/(x-(power(2,n)));
writeln ('P= ',P );
end.
var x,P:Real;
begin writeln ('введите x');
Readln(x);
P:=1;
for n:=1 to 6 do P:=P * (x-(power (2,n)-1))/(x-(power(2,n)));
writeln ('P= ',P );
end.
Интересные вопросы
Предмет: Математика,
автор: Larina583
Предмет: Биология,
автор: asifsabanov49
Предмет: Українська література,
автор: Аноним
Предмет: Алгебра,
автор: Колес