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

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

Задать свой вопрос
Кира Чавке
Там не пропущено 2? Может все же 1*2*4*8*16*... ?
Порвоткина Эмилия
Ну, как знаете...
1 ответ
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




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


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

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

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

Войти на сайт