Составить программу в паскале как изменяетс ястепень найти сумму 2^3+ 2^5 + …+ 2^9

Vika15678 Vika15678    3   31.03.2019 02:00    0

Ответы
DashaPOPOVA000000 DashaPOPOVA000000  27.05.2020 20:05

uses crt;
function step(n:integer):integer;
var p:integer;
begin
p:=2;
repeat
p:=p*2;
n:=n-1;
until n=1;
step:=p;
end;

var
a,sum,n:integer;
begin
n:=3;
repeat
sum:=sum+step(n);
n:=n+2;
until n>9;
write(sum);
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика