Var
a, b, c: real;
begin
read(a, b, c);
if (a + b > c) and (b + c > a) and (a + c > b)
then write('существует.')
else write('не существует.')
<span>end.</span>
А) a = 9
b = 9 mod 5 = 4
b = 4*10 = 40
a = 40 div 4 - 3 = 5
б) a = 123
b = 123 div 10 = 12
b = 12/4+2 = 5
b = 5*25+2 = 127
a = 123+127 = 250
в) a = 951
b = 951 div 100 + 951 mod 100 = 9 + 51=60
a = 951 div 10 = 95
a = 95 mod 10 = 5
a = 95+5=100
И(A1>-10) ⇒ Истина
<span>ИЛИ(A1<-15;И(A1>-10)) </span>⇒ Истина
Следовательно, в ячейке В1 будет А1
Алгоритм решения логарифмических уравнений.
1)Смотришь,чтобы у логарифмов были одинаковые основания;
Если основания разные,то приводишь к одинаковому основанию
2)Пишешь ОДЗ
3)Выполняешь арифметические действия;
4)Получаешь ответ,если ответ не сходится с ОДЗ,то корней уравнения нет.Если корни подходят,то выписываешь,те корни которые подошли
Program p;
var
a,b,c,s: integer;
begin
writeln('введите длину:');
readln(a);
writeln('введите диагональ:');
readln(c);
b := sqrt((sqr(c) - sqr(a)));
s := a * b;
writeln('площадь прямоугольника: ', s);
end.