1) 73=1001001 (2) 2)91=1011011 (2)
44=101100 (2) 28=11100 (2)
+1001001 -1011011
101100 11100
1110101= 117 (10) 111111=63 (10)
3)27=11011 (2)
5=101 (2)
*11011
101
+ 11011
00000
11011
10000111=135
4)70=1000110 (2)
7=111 (2)
- 1000110 | 111
111 |
1010= 10 (10)
-111
111
0
1) 73=1001001 (2) 2)91=1011011 (2)
44=101100 (2) 28=11100 (2)
+1001001 -1011011
101100 11100
1110101= 117 (10) 111111=63 (10)
3)27=11011 (2)
5=101 (2)
*11011
101
+ 11011
00000
11011
10000111=135
4)70=1000110 (2)
7=111 (2)
- 1000110 | 111
111 |
1010= 10 (10)
-111
111
0
Var x1,y1, x2,y2, r: Real;
Begin // начало программы
Clrscr; // очистка экрана
Write('x1=');
ReadLn(x1); // ввод х1
Write('x2=');
ReadLn(x2); // ввод х2
Write('y1=');
ReadLn(y1); // ввод у1
Write('y2=');
ReadLn(y2); // ввод у2
r:=sqrt(sqr(x2-x1)+sqr(y2-y1)); // вычисление расстояния между точками
WriteLn('r=',r:5:3); // вывод результата
readkey; // ожидание нажатия клавиши
end.