Напишите программу которая вычисляет площадь треугольника
А что здесь дано?
Я возьму прямоугольный треугольник, если уж вы не соизволили написать условие. S=1/2ab(высота на основание). program my;varS,a,b:real;beginwriteln('задайте значения сторон a,b');readln(a,b);S:=1/2*a*b;writeln('S=',s);end.
Почему-то тут без строчек... сейчас попробую отступить ЗДЕСЬ.
program my; var S,a,b:real; begin writeln('задайте значения сторон a,b');readln(a,b); S:=1/2*a*b; writeln('S=',s); end.