Задать вопрос
19 апреля, 01:40

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

+3
Ответы (1)
  1. 19 апреля, 02:40
    0
    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.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «2. Найти произведение P = (x + 1/5) (x + 4/9) ... (n мн.). Выполнить ручную трассировку при х=1, n=3 ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы