Даны площади нескольких квадратов. найти длину диагонали самого большого из них. (в delphi)

Procedure tform1.button1click(sender: tobject); var   s: string;   i: integer;   k: real; begin   edit1.text : = edit1.text + ' ';   for i : = 1 to length(edit1.text) do   begin     if (edit1.text[i] = ' ') then     begin       if (sqr(k) < strtofloat(s)) then       begin         k : = sqrt(strtofloat(s));         s : = '';       end;     end     else       s : = s + edit1.text[i];   end;   edit1.text : = floattostr(sqrt(sqr(k) + sqr(; end; площади в edit1 через пробел: )

153

Пошаговое объяснение:

Методом подбора и исключения можем выделить несколько чисел которые удовлетворяют первое выражение так, чтобы при 12 книжках на всех полках кроме последней, на последней полке оставалось 9. Подходчт такие числа как : 177, 165, 153, 141, 129, 117, 105, 93, 81, 69, 57, 45, 33, 21.

Проверяем все эти числа на соответствие второго условия, чтобы при 11 книжках на всех полках кроме последней, на последней оставалось 10 книг.

Подходят числа: 153 и 21.

Последнее условие говорит о том что если расставить книги по 9 на полке, то на всех останется равное количество книг. Данному условию соответствует только число 153.

ответ : 153 Книги.

Найти производную функции: y= cos 7x +log2(x5-3x) 2. Вычислить площадь фигуры, ограниченной осью абсцисс и параболой у= -x2+5x-6.

Пошаговое объяснение:

1) y' = (cos7x +log(2)(x⁵-3x) )' =-7sin7х+ 1*(2x-3)/ ( (х²-3х)Ln2)=

=-7sin7х+ (2x-3)/ ( (х²-3х)Ln2).

2)у= -x²+5x-6, ось ох.

у= -x²+5x-6, парабола ветви вниз. Координаты вершины х₀=-в/2а,

х₀=-5/(-2)=2,5  , у₀=0,25 .

Точки пересечения с ох, у=0 :-x²+5x-6=0 или    

x²-5x+6=0.   По т Виета х₁+х₂=5  ,х₁*х₂=6 . Значит х₁=2, х₂=3 и пределы интегрирования  от 2 до 3:

S=∫(-x²+5x-6))dx=(-х³/3+5х²/2-6х) |  =

(-3³/3+5*3²/2-6*3) -(-2³/3+5*2²/2-6*2) =

=-9+22,5-18+8/3-10+12=

=-37+34,5+8/3=1/6