Уравнение окружности радиуса R, центр которой совпадает с началом системы координат в декартовой системе координат имеет вид
x²+y²=R²
Для данного случая можно записать x²+y²=6² или x²+y²=36.
Заштрихованная область находится внутри окружности и при этом x>2, т.е. является сегментом круга, поэтому условие принадлежности некоторой точки M(x,y) сегменту запишется в виде (x²+y²<36) ∩ x>2.
Если границы сегмента также принадлежат заштрихованной области, неравенства меняются на нестрогие: (x²+y²≤36) ∩ x≥2.
<em>// PascalABC.NET 3.2, сборка 1485 от 15.06.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
Write('Введите координаты x,y точки: ');
var (x,y):=ReadReal2;
Writeln((x*x+y*y<=36) and (x>=2))
end.
<u>Пример</u>
Введите координаты x,y точки: 3.5 4.8
True
Указывайте, пожалуйста, язык программирования.
Могу предоставить код на C++:
int main(){
for(int x = 0; x <=20; x+=2)
{
printf("%i",9*(x*x)+6*x);
}
}
На pascal всё гораздо муторней.
var x,i:integer;
begin
x := 0;
for i:= 1 to 11 do
begin
writeln(9*(x*x)+6*x);
x := x + 2;
end;
end.
Светлана: 1→¬(1+0)=1→¬1=1→0=0;
Анатолий: 1→¬(0+1)=1→¬1=1→0=0;
Римма: 0→¬(1+0)=0→¬1=0→0=1;
Дмитрий: 1→¬(1+0)=1→¬1=1→0=0;
Ответ: Римма
#include <iostream>
using namespace std;
#define N 10
int main()
{
int array[10] ={1,2,3,4,5,6,7,8,9,10};
int sum=0;
for(unsigned int i=1;i<N;i+=2)
sum+=array[i];
cout<<sum<<endl;
return 0;
}
Раз не указан язык, пусть будут плюсы
