1. 

   Qwert_ZX New Member

   Задача.Найти площадь кольца, внутренний радиус которого R1, а внешний -R2. (R2>R1)

    

   Qwert_ZX, 26 мар 2010

   #1
2. 

   bazil_BY New Member

   Program zadacha;
   Var R1, R2, S :real;
   Begin
   Writeln ('Введите радиусы');
   Readln(R1,R2);
   S:=(sqr(pi)*R2)-(sqr(pi)*R1);
   Writeln (S);
   end.

    

   bazil_BY, 26 мар 2010

   #2

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

Пароль:

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

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