• РЕШИТЕ ЗАДАЧУ НА ЯЗЫКЕ ПАСКАЛЬ! 

    Даны радиусы большой и малой окружности r1,r2. Найти S заштрихованной фигуры СМОТРИТЕ В ВЛОЖЕНИЯ ФОТО

    question img

Ответы 1

  • program p;

    var

     r1,r2:integer;

    pi,s:real;

    begin

    pi:=3,1428l

    readln(r1,r2)

    if r1>r2 then

    s=pi*r1*r1-pi*r2*r2

    else

    s=pi*r2*r2-pi*r1*r1

    writeln(s);

    end.

  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years