До субботы надо сделать , всё расписать каждый пример ! прошу , кто шарит ! оценка нужна !

По трем сторонам - формула герона. var a,b,c,p: real; begin write('введите стороны: '); readln(a,b,c); p : = (a + b + c) / 2; writeln('площадь равна ', sqrt(p * (p - a) * (p - b) * (p - c)): 9: 4); end. а через основание и высоту (твоя формула): var a,h: real; begin write('введите длину основания и высоты, проведенной к нему: '); readln(a, h); writeln('площадь равна: ', (a * h) / 2: 9: 4); : 9: 4 -- это такой оператор, который выводит число в формате с фиксированной точкой и 4 знаками после запятой.

Const   n = 20; var   x: array[1..n] of integer;   i: integer; begin   randomize;   writeln('элементы массива');   i : = n;   for i : = 1 to n do   begin       x[i] : = random(101) - 50;       write(x[i]: 4);   end;   writeln;   while (i > = 1) and (x[i] > = 0) do i : = i - 1;   if i > 0 then       writeln('последний отрицательный элемент x[', i, ']=', x[i])   else       writeln('нет отрицательных элементов') end. тестовое решение: элементы массива     5  -9 -32 -48  33    2 -41  24  31 -31 -48 -24 -17  45 -41 -23  -1  38  45  14 последний отрицательный элемент x[17]=-1