Определить, какая из двух точек а(xa, ya), b (xb, yb) находится ближе к окружности с радиусом r с центром в начале координат. та точка находится ближе к окружности с радиусом r, для которой разность (xi +yi) - r меньше.

Значитса тебе надо найти квадраты чисел до самого n ,для этого мы объявляем  переменную k и присваиваем ей 1 и переменную s, которой присваиваем значение 0, после делаем цикл от 1 до n с шагом 1 и там же к s прибавляем k, а k увеличиваем на 2 ( на 1 шаге k=3,  на 2 k=5 и т. д., то есть нечетные числа) ну и выводим в цикле s  #include < iostream> #include < conio.h> using namespace std; int main() {    int n;     cin> > n;     int k=1,s=0;     for(int i=1; i< =n; i++)    {      s=s+k;       k=k+2;     cout< < i< < "^2 = "< < s< < endl;     } _getch(); return 0; }

Program z3; var a: array[1..3] of string; var b: array[1..3] of string; i,k: byte; begin writeln('ввод названий газет: ');   for i: =1 to 3 do begin write('[',i,']'); readln(a[i]); end; writeln('ввод подписчиков: ');   for i: =1 to 3 do begin write('[',i,']'); readln(b[i]); end; for i: =1 to 3 do begin   if (a[i]='правда') and (b[i]= 'петров') then begin k: =i;   writeln('да, петров выписывает газету ',a[i]); end;   end; end. ввод названий газет:   [1]книга [2]правда [3]вера ввод подписчиков:   [1]библиотекарь [2]петров [3]гундяев да, петров выписывает газету правда