Var
n, p, i: integer;
begin
readln(n);
i:=1;
p:=3;
while true do
if i<=n then
begin
i:=i+p;
p:=p+2;
end
else
begin
write(i);
exit;
end;
<span>end.</span>
#include <iostream>
#include <math.h>
using namespace std;
int main(){
int x1,y2,x2,y2, r1, r2;
cin >> x1 >> y1 >> endl; //вводим координаты первой точки
cin >> x2 >> y2 >> endl; //вводим координаты второй точки
r1 = sqrt(x1*x1 + y1*y1); //находим расстояние от первой
r2 = sqrt(x2*x2+y2*y2) //от второй
if (r1>r2){
cout << "Точка 1 ближе к началу координат";
}
else{
cout << "Точка 2 ближе к началу координат";
}
else if (r1=r2){
cout << "Эти точки равны"
}
return 0;
}
Музыкант дружил с Андреевым, сейчас дружит с Ивановым, значит, он не Андреев и не Иванов. Кроме того, Андреев никогда не был знаком с Петровым ,но был дружен с музыкантом, значит ,Петров-тоже не музыкант.Поэтому музыкант Сидоров.
Иванов и Андреев-не солисты хора, так как были на его концерте, поэтому знаком с ним.Значит, Андреев- не художник,Андреев-танцор
Для Ивана остался последний вариант, Иванов-художник
Растровая Графика - это технология представления изображений
Изображение - это изображение представленное растровой графикой
Var
s:real;
n,i:integer;
a:array[1..1000] of real;
begin
write('Введите кол-во элементов: '); readln(n);
writeln('Введите элементы: ');
for i:=1 to n do
read(a[i]);
s:=0;
for i:=1 to n do
if odd(i) then s:=s+a[i];
writeln('Сумма: ',s);
end.
