<span>const
D: real = 10; // число км в день
p: real = 1.12; // %
M: integer = 30;// число дней в месяце
N: integer = 25;// макс дистанция в условии задачи
var c: integer;
s, x: real;
begin
x := D;
for c := 1 to </span>M<span> do begin
s := s + x;
x := x * p;
end;
writeln('в месяц пробегает: ', s);
x := D; c := 0;
while (x < N) do begin
c := c + 1;
x := x * p;
end;
writeln('Нужно ', c, ' дней');
end.
</span>
<span>Домашні тварини живуть з людиною, яка їх утримує, надаючи їм житло і їжу. Домашні тварини приносять людині користь, або як джерело матеріальних благ і послуг, або як друзі, що скрашують його дозвілля. Більшість домашніх тварин легко розмножуються. Проводячи штучний відбір, людина може контролювати розмноження домашніх тварин і ознаки, які вони передають своєму потомству. Домашні тварини можуть міститися в спеціальних приміщеннях (скотний двір, стайня, собача будка), але можуть жити і безпосередньо в будинку людини. З тих тварин, які живуть в будинку, одних містять в клітинах, акваріумах, тераріумах і інших "будиночках", а іншим (наприклад, кішкам, собакам, кроликам і навіть мавпам) дозволяють вільно переміщатися по приміщенню.
</span>
<span>Если помог, жми "Спасибо"</span>
110010 = 32 + 16 + 2 = 50
1100 = 12
50 + 12 = 62 (всего тетрадей).
#include <bits/stdc++.h>
using namespace std;
int main()
{
int n;
setlocale(LC_ALL,"Russian");
cin >> n;
if ( n > 0 )
cout << "Положительное\n";
else
cout << "Отрицательное\n";
n = abs(n);
int ans = 0;
while (n)
{
n /= 10;
ans++;
}
cout << ans << " цифр\n";
}