Написать программу для вычисления площади параллелограмма все данные вводятся с клавиатуры.
Program Ploshad; var a,h,S: real; Begin Writeln('Введите высоту'); Readln(h); Writeln('Введите сторону, на которую опущена высота'); Readln(a); S:=(a*h)/2; Writeln('Площадь параллелограмма= ',S); end.