А что собственно не так? Добавил "program", убрал "uses" - вроде правильно всё работает...
<hr />
program ideone;
var a:array [1..15] of integer;
i,k,s:integer;
begin
randomize;
for i:=1 to 15 do
begin
a[i]:=random (21) -10;
writeln (a[i]:4);
end;
writeln;
s:=0;
k:=0;
for i:=1 to 15 do
if abs(a[i]) mod 10=5 then begin
k:=k+1;
s:=s+a[i];
end;
writeln('k=',k);
writeln('s=',s);
end.
Во-первых , задача не дописана,сумма обратных величин должна быть равна 1. Самый простой случай решения такой задачи это просуммировать 2015 дробей равным 1\2015 :
1 = 1\2015+ 1\21015+....+1\2015 15 таких дробей.Это один из вариантов.
Другой вариант более сложный:начинается решение с известного равенства :1=1\2+1\3+1\6.Потом 1\6 представляют как сумму дробей, представленных для 1\6, только с числителем тоже 1, а в знаменателях будет делённое на 6:1= 1/(2*6)+1/(3*6)+1/(6*6) = 1/12+1/18+1/36.Далее так же, то есть: 1/366получим 1/6 поделив на 6 и получим:/(12*6)+1/(18*6)+1/(36*6)..И так далее.То есть берём крайнюю дробь, каждый раз делим на 6 и пошло так дальше.Сколько таких преобразований нужно, когда получим 2015 дробей, а это будет через (примерно)2015\3=670 раз и одну дробь не преобразовывать.Сколько хочешь таких дробей можно получить.
Попробую объяснить:
Получается, что число 441 состоит из трёх одинаковых частей. Одна часть от числа 441 это первое число. Вторая и третья части составляют второе число от числа 441 (следовательно второе число будет в два раза больше первого).
Решение:
441 : 3 = 147 - одна часть от числа 441 или первое число
147 * 2 = 294 - второе число
294 + 147 = 441 - сумма первого и второго числа.
Подвоха нет, обе записи верны: 2 различных выражения, записаны разными способами, и эти выражения дают разный результат.
Если считать что знак ÷ обозначает деление, то верхнее выражение, записано в виде для вычислений на компьютере по правилам записи операций в строчку (сначала операции в скобках, а потом по приоритетам: сначала умножение и деление, потом сложение и вычитание; операции с одним приоритетом слева направо, это написано в учебниках по информатике), на языке математических формул будет так:
нижнее выражение уже записано на языке математических формул:
Проблема в том, что некоторые, путая запись в строчку и математическую запись, считают, что левые части этих равенств являются разными вариантами записи одного выражения.
У мальчиков арбуз был в (20/15)^3=64/27=2,37 раз больше по объему. Если считать, что съедобная часть арбуза занимает одинаковую долю независимо от его размера или массы, то каждый мальчик съел в (2,37/6)/1/4=в 1,58 раз больший кусок арбуза, чем каждая девочка.