Задать вопрос
27 апреля, 15:34

Составить программу: Р=1*4*8*16 ... 1024.

+3
Ответы (1)
  1. 27 апреля, 16:15
    0
    Var

    i, n, t:integer;

    p:real;

    begin

    p:=1; t:=2;

    for i:=1 to 9 do begin

    t:=2*t;

    p:=p*t

    end;

    Writeln (p) ;

    end.

    Результат

    1.8014398509482E+16
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Составить программу: Р=1*4*8*16 ... 1024. ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы