Написать программу на Паскале

1. Найти объем параллелепипеда (стороны ввести с клавиатуры)
2. Высота треугольника равно 7 см, а основание 3 см. Написать программу, вычисляющую площадь треугольника
3. Вывести на экран сообщение "Чему равно 10 : 2?" (Написать часть программы для этого вывода)

№1var vol, a, b, c: real;beginwrite('Введите сторону а: ');readln(a);write('Введите сторону b: ');readln(b);write('Введите сторону c: ');readln(c);vol := a * b * c;writeln('Объем прямоугольного параллелепипеда равен ', vol);end.№2const a = 3;const h = 7;var S: real;beginS := 1 / 2 * a * h;writeln('Площадь треугольника равна ', S);end.№3var s: string;begins := 'Чему равно 10 : 2?';writeln(s);readln();end.