1. Для проверки на возможность существования треугольника, скорее всего подразумевается условие неравенства треугольника, согласно которому, ни одна сторона не может быть больше суммы двух других сторон. А проверить прямоугольный треугольник или нет достаточно легко по теореме Пифагора
VAR a, b, c: INTEGER; {длины сторон треугольника}
BEGIN
READLN (a, b, c);
IF (a>b+c) OR (b>a+c) OR (c>a+b) THEN WRITELN ('Такого треугольника не существует') ELSE BEGIN
IF (SQR(a) = SQR(b) + SQR(c)) OR (SQR(b) = SQR (a) + SQR (c)) OR (SQR(c) = SQR (a) + SQR (b)) THEN WRITELN ('Треугольник прямоугольный') ELSE WRITELN ('Треугольник не прямоугольный');
END.
2.
VAR a, b: INTEGER;
BEGIN
READLN (a, b);
WRITE ('Даны числа ', a,' и ', b,' .');
IF a>b THEN WRITELN ('Квадрат большего из них равен ', SQR(a));
IF b>a THEN WRITELN ('Квадрат большего из них равен ', SQR(b));
END.
3. Немного лень над ней думать, если честно.
Останется строка 77.
Рассмотрим последовательность из 12 четверок.
4444 4444 4444 При заменах эта последовательность перейдет в следующую 77 4444 4444 Далее, так как 7 только 2, а не три, заменяем четыре 4 на две семерки, получим последовательность
7777 4444 , теперь семерок больше 3, заменяем три семерки на 4, получим последовательность 47 4444, далее, заменяем четыре 4 на две семерки, последовательность будет 4777, семерок три, заменяем их на четверку, получим 44 .
Таким образом, строка из 12 четверок преобразуется в строку из двух четверок. Если и дальше будем продолжать преобразования, то следующая последовательность из 12 четверок преобразуется в две четверки, получается цикл длиной 10 символов. Всего таких циклов будет 20
204/10 = 20*10 + 4 В конце получится строка из четырех четверок, а четыре 4 преобразуются в 77, получится строка 77.
Семёнов математика.Иванов физика.Борисов информатика.
Среднее значение будет вычислено:
<span>=AVERAGE(B1:B3;C4:F4;G1:G3;H5:I5)</span>
<span>
Общий диапазон D8:E0</span>