Нужно написать программы в Паскале:
1. Найдите целую часть от деления 15 на 4 и умножьте ее на 18.
2. Вычислите периметр треугольника. Длины сторон задаются пользователем с
клавиатуры.
3. Вычислите площадь и периметр прямоугольника. Длины сторон задаются
пользователем с клавиатуры.
4. Вычислите объем и площадь поверхности параллелепипеда. Длины ребер
задаются с клавиатуры.
5. Вычислите длину окружности. Радиус окружности задается с клавиатуры.

Хотя бы что-то из этого, спасибо!

//Pascal//1beginwriteln((15 div 4)*18);end.//2var a, b, c: real;beginwrite('Введите стороны треугольника A B C: '); readln(a, b, c);writeln('Периметр = ', a + b + c);end.//3var a, b: real;beginwrite('Введите стороны прямоугольника A B: '); readln(a, b); writeln('Площадь = ', a * b); writeln('Периметр = ', 2 * (a + b));end.//4var a, b, c: real;beginwrite('Введите ребра A, B, C: '); readln(a, b, c);writeln('Площадь = ', (2*(a*b+b*c+a*c)):0:1);writeln('Объем = ', (a*b*c):0:1);end.//5var r: real;beginwrite('Введите радиус: '); readln(r);writeln('Длина окружности = ', (2 * pi * r):0:1);end.