Написано на языке PascalABC.NETconst cValue = 2;var N, i: integer; resultNumber: real;begin Readln(N); for i := 1 to N do resultNumber := resultNumber + Power(cValue, i); Writeln(resultNumber);end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
