D.
Ключик "говорит": открой!
Замок понял,что делать и открыл!
1 задание.
-----------------------------------------------------------------------------------------------------
День недели | Газеты
|---------------------------------------------|----------------------------------
| Известие | Технические газеты | Медицинские новости
-----------------------------------------------------------------------------------------------------
Понедельник | 8 экз. | 7 экз. | 5 экз.
-----------------------------------------------------------------------------------------------------
Вторник | 13 экз. | 4 экз | 8 экз
-----------------------------------------------------------------------------------------------------
Среда | 10 экз. | 10 экз | 12 экз
-----------------------------------------------------------------------------------------------------
Четверг | 8 экз. | 7 экз. | 15 экз.
-----------------------------------------------------------------------------------------------------
Пятница | 10 экз | 5 экз | 8 экз
-----------------------------------------------------------------------------------------------------
Суббота | 9 экз | 13 экз | 8 экз
-----------------------------------------------------------------------------------------------------
Воскресенье | 5 экз | 6 экз | 9 экз
-----------------------------------------------------------------------------------------------------
Всего | 63 экз. | 52 экз. | 65 экз
------------------------------------------------------------------------------------------------------
Могу только с этим помочь(
Var n,i:integer; s:real;
begin
readln(n);
s:=0;
for i:=0 to n do s:=s+1/(2*i+1);
writeln('s = ',s);
end.
Пример:
5
<span>s = 1.878210678210678e+00</span>
На каком языке требуется составить программу?