• На плоскости на расстоянии s [1], s [2],..., s [10] от центра кругового кольца с внутренним радиусом r и внешним R расположены точки. Определить  количество точек, расположенных внутри кольца. ч/з турбо паскаль(одномерный массив). Помогите плз.

Ответы 1

  • если правильно понял

    program k,i,r1,R2:integer;

                     s:array[1..10] of integer;

    begin;

    k:=0;

    readln(r1);

    readln(r2);

    for i:=1 to 10 do read(a[i]);

    for i:=1 to 10 do

    if (a[i]>r1) and (a<r2) then inc(k)

    write(k);

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

Еще вопросы

Войти через Google

или

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

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

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