Расстояние будет равно sqrt(sqr(x2 - x1) + sqr(x2 - x1))
Кисть,или какая-то форма(например квадрат)
Каждый символ: 8 бит = 1 байт = 1/1024 Мбайт = 1 / (1024 * 1024) (Гб).
Есть способ поизящнее, но можно и так:
program test;
uses crt;
var
arr:array[1..100] of integer;
i:integer;
begin
clrscr;
for i:=1 to 100 do
begin
arr[i]:=random(100);
write(i,': ');
writeln(arr[i]);
end;
writeln;
i:=2;
while(i<100)do
begin
write(i,': ');
writeln(arr[i],' ');
i:=i*2;
end;
readln;
end
.jpg .mpg короче стандартные разрешения