Теперь смотри, у тебя твоя функция имеет название и тип GetMath(x:real):real
И ты внутри этой функции пытаешься этой же функции (GetMath) присвоить это значение = ('y=', cos(4*sqrt(x)+1))
Ошибка в том, что ты функции пытаешься присвоить значение, но ей нельзя ничего присваивать!! Ты можешь только присвоить какой-нибудь переменной значение, полученное функцией.
Пусть количество флешек равно соответственно a1, a2, a3, a4, причем эти количества уже отсортированы таким образом, что a1≥a2≥a3≥a4. Рассмотрим худший случай. Выбрали 3 комплекта флешек с максимальным их количеством. a1+a2+a3. После этого добавили одну флешку и получили 100 флешек, среди которых хотя бы одна из наименьшей группы. То есть a1+a2+a3=99 в худшем случае. Значит, a4=113-99=14. Теперь надо определить наименьшее количество флешек, чтобы гарантированно на руках было 3 вида. Опять же рассмотрим худший случай. Так выбрали флешки, что среди них все флешки первого вида, все флешки второго вида. Но все равно одной флешки третьего вида не хватает. В худшем случае значение a1+a2 должно быть максимально возможным. Казалось бы, есть условие a1+a2+a3=99. Но не стоит забывать про то, что ранее были наложены ограничения на a1, a2, a3, a4: a1≥a2≥a3≥a4. В связи с добавленным позже определением a4=14, ограничение для a3 становится таким: a3≥14. В худшем случае, чтобы максимизировать a1+a2, следует выбрать a3=14. То есть a1+a2=99-14=85. Следовательно, необходимо 85+1=86 флешек, чтобы быть уверенным, что хотя бы три флешки разных видов присутствуют.
Твой код:
function GetMath(x:real):real:
begin
GetMAth:= ('y=', cos(4*sqrt(x)+1));
end;
Теперь смотри, у тебя твоя функция имеет название и тип GetMath(x:real):real
И ты внутри этой функции пытаешься этой же функции (GetMath) присвоить это значение = ('y=', cos(4*sqrt(x)+1))
Ошибка в том, что ты функции пытаешься присвоить значение, но ей нельзя ничего присваивать!! Ты можешь только присвоить какой-нибудь переменной значение, полученное функцией.
Например:a,b:real;
a:= 5;
b:= GetMath(a)