Составить программы ** языке Паскаль для решения задач. Задача 1. Вычислить площадь...

Question

Составить программы на языке Паскаль для решения задач. Задача 1. Вычислить площадь прямоугольника и длину его диагонали, если стороны соответственно имеют длины 5 и 8 см. Задача 2. Написать программу, которая вычисляет площадь треугольника s, со стороной a=10 и высотой h=15. Задача 3. Вычислить площадь трапеции с высотой h=8 и основаниями a=10 и b=20.

Answer 1

Задача 1.

var

a,b,S,d: real;

begin

a:=5;

b:=8;

d:=sqrt(sqr(a)+sqr(b));

S:=a*b;

writeln('d = ',d);

writeln('S = ',S);

end.

Задача 2.

var

a,h,S: real;

begin

a:=10;

h:=15;

S:=1/2*a*h;

writeln('S = ',S);

end.

Задача 3.

var

a,b,h,S: real;

begin

a:=10;

b:=20;

h:=8;

S:=1/2*(a+b)*h;

writeln('S = ',S);

end.

Comments

а разве не Integer?

---

можно и integer)

---

Хорошо, спасибо

---

я чтоб потом не замарачиваться просто сразу взял реал