Question

Практическая работа №22

Тема: Разработка линейных алгоритмов

Задание:

1. Задача 1 Найти площадь треугольника со сторонами a,b и с (линейный алгоритм). Составить блок-схему. Набрать программу в PascalABC и протестировать.

Answer 1

Ответ:

Program zadacha;

var a, b, c, S, p:real;

Begin

Read (a,b,c);

p:=(a+b+c)/2;

S:=sqrt (p*(p-a)*(p-b)*(p-c));

Writeln('S=',S);

end.