Есть ответ 👍

Нужна ваша Побудувати алгоритм з розгалуженням Может 1 только Только решить ​

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

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


Var m: real; k: integer; begin m: =100; k: =0; while m> 80 do   begin   k: =k+1;   m: =m*0.99;   end; writeln('k = ',k); end. результат: k = 23

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