Есть ответ 👍

Закомментировать каждую строчку кода

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

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

QwErTyля
4,8(73 оценок)

Var a,c,k: real; begin write('a = '); readln(a); write('c = '); readln(c); k: =0; while a< =c do     begin     a: =a*1.25;     k: =k+1;     end; writeln('k = ',k) end.

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