Переведите числа из двоичной системы счисления в десятичную: 10010011² 1001000²

248

404

Посмотреть ответы 1

Ответы на вопрос:

dmukh

Информатика

4,6(80 оценок)

Думаю так var i, n: integer; s: real; begin write('s n? '); readln(s, n); for i: =1 to n do s: =s*1.02; writeln(s: 0: 2); readln end. а проще без цикла: var n: integer; s: real; begin write('s n? '); readln(s, n); writeln(s*exp(n*ln(1.02)): 0: 2); readln end. а на языке программы не составляют. pascal, c, c++