1. 

   met@l New Member

   Помогите пожалуйста!Даны 2 вещественных числа.Найти сумму их квадратов,разность кубов и произведения корней

    

   met@l, 1 апр 2010

   #1
2. 

   muhamor New Member

   Var
     a, b, sum, raz, prod : real;
   begin
     read (a, b);
     sum := sqr(a) + sqr(b);
     raz := a*sqr(a) - sqr(b)*b;
     prod := sqrt(a) * sqrt(b);
     write (sum, ' ', raz, ' ', prod);
   end.

    

   muhamor, 1 апр 2010

   #2

Ваше имя или e-mail:

Пароль:

Забыли пароль?

Запомнить меня