Поделитесь своими знаниями, ответьте на вопрос:
1.составить алгоритм и программу, вычисления площади и периметра прямоугольного треугольника, значения длин которого (a, b, c) в программе. площадь вычисляется по формуле: s=a*b/2, периметр p=a+b+c. 2.записать результат выполнения программы вычисления значения выражения. x=20. y=10. a=x+3yx
begin
write('Введите стороны прямоугольника: ');
read(a, b);
writeln('Периметр = ', 2 * a + 2 * b);
end.
2. var p, b: real;
begin
write('Введите два числа: ');
read(p, b);
writeln('Произведение = ', p * b);
writeln('Разность = ', p - b);
end.
3. var b: real;
begin
write('Введите длину ребра: ');
read(b);
writeln('Объем = ', b * b * b);
end.
4. var r: real;
begin
write('Введите радиус: ');
read(r);
writeln('Площадь = ', 3.14 * r * r);
end.
5. var a, b, c: real;
begin
write('Введите три стороны: ');
read(a, b, c);
writeln('Периметр = ', a + b + c);
end.