Блок-схема - в прилагаемом файле.
Программа:
var n,r,a,b,k,x,y,i:integer;
begin
readln(n,r,a,b);
k:=0;
for i:=1 to n do
begin
readln(x,y);
if sqr(x-a)+sqr(y-b)<r*r then k:=k+1;
end;
writeln('k = ',k);
end.
Пример:
3 4 1 1
2 2
-2 -3
0 0
k = 2
Const n=10;
var ar:array[1..n] of integer;
a,p,i:integer;
begin
write('a = ');
readln(a);
write('p = ');
readln(p);
ar[1]:=a;
for i:=2 to n do ar[i]:=ar[i-1]+p;
for i:=1 to n do write(ar[i],' ');
end.
Пример:
a = 2
p = 5
2 7 12 17 22 27 32 37 42 47
В Linux несколько другие правила построения имен файлов, поэтому вам придется с этим смириться. Начнем с того, что в Linux нет такого понятия, как расширение файла. В Linux несколько другие правила построения имен файлов, поэтому вам придется с этим смириться. Начнем с того, что в Linux нет такого понятия, как расширение файла. Например, возьмем имя файла Documentl.doc. В Windows именем файла является Document 1, a doc — это расширение. В Linux Documentl.doc — это имя файла, расширения нет.
Максимальная длина имени файла — 254 символа. Имя может содержать любые символы (в том числе и кириллицу) , кроме /, \, ?,<, >, *, \ |. Кириллицу в именах файлов я бы не рекомендовал вообще использовать. Если вы уверены, что не будете эти файлы передавать Windows-пользователям (на дискете, по электронной почте) — используйте на здоровье. А если же нужно будет отправить файл по электронной почте (кодировка-то у всех разная, поэтому вместо русскоязычного имени пользователь увидит абракадабру) , лучше использовать латиницу в имени файла.
Также вам придется привыкнуть к тому, что система Linux чувствительна к регистру в имени файла: FILE.txt и FiLe.Txt — это два разных файла.
<span>Для разделения элементов пути используется символ / (прямой слэш) , а не \ (обратный слэш) , как в Windows.</span>
