Question

ПОМОГИТЕ ДАЮ 75 БАЛЛОВ

Answer 1

Ответ:

var

   a,b,c,s1,s2: integer;

begin

   writeln ('Введите через пробел значения a,b,c');

   read(a);

   read(b);

   read(c);

 

   s1 := a*b; {площадь большой фигуры}

   s2 := c*c; {площадь квадрата}

   writeln ('Площадь закрашенной фигуры = ',s1-s2)

end.