Т.е. "4" выходит?) Вот решение, но можно было короче, а можно было .NET подключить ещё... Но это вот классика)
var
a, b, c, d, f, P: real;
begin
readln(a, b, c, d, f);
P := (a + b + c + d + f) / 5;
writeln(P);
<span>end.</span>
2+2=4
2+4=6
2+6=8
2+8=10
2+10=18
2+12=14
2+14=16
2+16=18
2+18=20
(так же делаешь с числами 4, 6, 8.....18)
2*3*21=126 таблеток надо выпить всего
126:10=12,6 упаковок
следовательно 12,6=~13
ответ 13 упаковок
91
- в двоичную
<span>Делим число на 2 и выписываем остатки</span>
<span>91 = 45·2 + </span>1
<span>45 = 22·2 + </span>1
<span>22 = 11·2 + </span>0
<span>11 = 5·2 + </span>1
<span>5 = 2·2 + </span>1
<span>2 = 1·2 + </span>0
<span>Последний множитель перед 2 равный </span>1<span> записываем первым.</span>
<span>Затем записываем найденные остатки в обратном порядке.</span>
<span>Получаем: </span>1011011
- в восьмеричную
<span>Делим число на 8 и выписываем остатки</span>
<span>91 = 11·8 + </span>3
<span>11 = 1·8 + </span>3
<span>Последний множитель перед 8 равный </span>1<span> записываем первым.</span>
<span>Затем записываем найденные остатки в обратном порядке.</span>
<span>Получаем: </span>133
- в шестнадцатиричную
<span>Делим число на 16 и выписываем остатки</span>
<span>91 = 5·16 + </span>11<span> (11 записывается как </span>B<span>)</span>
<span>Последний множитель перед 16 равный </span>5<span> записываем первым.</span>
<span>Затем записываем найденные остатки в обратном порядке.</span>
<span>Получаем: </span>5B
52
- в двоичную
<span>Делим число на 2 и выписываем остатки</span>
<span>52 = 26·2 + </span>0
<span>26 = 13·2 + </span>0
<span>13 = 6·2 + </span>1
<span>6 = 3·2 + </span>0
<span>3 = 1·2 + </span>1
<span>Последний множитель перед 2 равный </span>1<span> записываем первым.</span>
<span>Затем записываем найденные остатки в обратном порядке.</span>
<span>Получаем: </span>110100
- в восьмеричную
<span>Делим число на 8 и выписываем остатки</span>
<span>52 = 6·8 + </span>4
<span>Последний множитель перед 8 равный </span>6<span> записываем первым.</span>
<span>Затем записываем найденные остатки в обратном порядке.</span>
<span>Получаем: </span>64
- в шестнадцатиричную
<span>Делим число на 16 и выписываем остатки</span>
<span>52 = 3·16 + </span>4
<span>Последний множитель перед 16 равный </span>3<span> записываем первым.</span>
<span>Затем записываем найденные остатки в обратном порядке.</span>
<span>Получаем: </span>34