Определи расстояние на плоскости между двумя точками с заданными координатами m1(x1,y1)и m2(x2,y2) . ответ введи целым числом. если координаты точек: x1=2; y1=4x2=9; y2=12 . ответ округли до целых. ответ: d=
ISO-8859-5 - применялась при русификации компьютерных систем Sun, поставлявшихся в Россию CP1251 - символы, соответствующие русским буквам, идут подряд ASCII - символы, с номерами от 0 до 128, одинаковые для всех кодовых страниц KOI8 - если у кода, соответствующего русским буквам "а", "б", "ц", "д", обнулить первый бит, то получатся коды, соответствующие английским буквам "a", "b", "c", "d". символы, соответствующие русским буквам, идут подряд CP866 - символы псевдографики кодируются теми же кодами, что и в английской кодовой таблице
Число в фибоначчиевой системе счисления единственным образом представляется в виде последовательности 0 и 1, причем никакие 2 единицы не стоят рядом. Каждый разряд числа соответствует числу Фибоначчи. 0-й разряд соответствует числу 1 1-й разряд соответствует числу 2 2-й разряд соответствует числу 3 3-й разряд соответствует числу 5 и т.д. То есть, если решать программно, генерим числа Фибоначчи до тех пор, пока не дойдем до чисел, которые надо перевести: 1,2,3,5,8,13,21,34. Затем, начиная с самого большого, проходимся по разрядам: Для числа 41: 7) 41≥34 => 7-й разряд равен 1. Вычитаем из 41 число Фибоначчи, соответствующее этому разряду и получаем 41-34=7 6) 7<21 => 6-й разряд равен 0 5) 7<13 => 5-й равен 0 4) 7<8 => 4-й равен 0 3) 7≥5 => 3-й равен 1, 7-5=2 2) 2<3 => 2-й равен 0, 1) 2≥2 => 1-й равен 1, 2-2=0 0) 0<1 => 0-й равен 0 Полученное число: 10001010 Для числа 46: 7) 46≥34 => 7-й равен 1, 46-34=12 6) 12<21 => 6-й равен 0 5) 12<13 => 5-й равен 0 4) 12≥8 => 4-й равен 1, 12-8=4 3) 4<5 => 3-й равен 0 2) 4≥3 => 2-й равен 1, 4-3=1 1) 1<2 => 1-й равен 0 0) 1≥1 => 0-й равен 1, 1-1=0 Результат: 10010101
function l(a,b,c,d :integer) : real;
var
s: real;
begin
s:=sqrt((c-a)*(c-a)+(d-b)*(d-b));
l:=s;
end;
var
x1,x2,y1,y2 : integer;
begin
writeln('Введите координаты первой точки');
read(x1,y1);
writeln('Введите координаты второй точки');
read(x2,y2);
writeln('d=',Round(l(x1,y1,x2,y2)));
end.