Ответа на вопрос не последовало. Поэтому привожу решение в пакете Maple 15 (см. вложение)
А экстремумов у этой функции нет...
М - количество ракушек у мудрика
Э - количество какушек у элзик
Из первого условия:
М-1 = Э+1 (1)
Из второго условия:
М +1 =2*(Э-1) (2)
Из (2) уравнения находим: М= 2*Э -2-1=2*Э-3.
Подставляем М во (1) уравнение:
2*Э-3-1=Э+1 --> Э =5, подставляем Э=6 в (1) уравнение и находим М:
М=7
Ответ: было: у мудрика 7 ракушек, у элзика 5 ракушек
program jfe3;
const n=10; {Это будет кол-во элементов массива}
var a:array [1..n] of integer; i,s:integer;
begin
for i:=1 to n do begin
a[i]:=random(100); {элемент выбирается случайно от 0 до 100}
s:=s+a[i]; {Когда эл. присвоился, его значение плюсуется к общ сумме}
end;
for i:=1 to n do
writeln(a[i],' '); {показать сам массив}
writeln(s); {показать сумму}
readln; {чтобы окно сразу не закрывалось}
end.
Если есть вопросы по программе, пиши в личку. Если надо что-то еще - тоже =)
Удачи)
Нужно изучить строение машин электронику компьютеры что позволяет компьютерам реализовать информацию перерабатывать и знать технологию электронику
Var
c,k:real;
begin
Write('Введите C и K: ');
Readln(c,k);
If Int(c/k)=0 then Writeln(c-k)
else Writeln(c+k)
end.