Есть ответ 👍

Решите 7, 8, 10 задачи с пояснением ​

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

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


Procedure copy_bacterium(time: integer); var i, bacterium: integer;     begin     bacterium: = 1;     for i: =1 to time do         bacterium: = bacterium * 2;     writeln(bacterium);       end; var n: integer; begin readln(n); copy_bacterium(n); end.     

Популярно: Информатика