Ответ:
Объяснение
import math
x1 = float(input("Введите x1 - "))
y1 = float(input("Введите y1 - "))
x2 = float(input("Введите x2 - "))
y2 = float(input("Введите y2 - "))
L = math.sqrt((x2-x1)**2+(y2-y1)**2)
print("L = " + str(L))
Uses Drawman;
var a,i:integer;
procedure square(a:integer);
begin
pendown;
onvector(a,0);
onvector(0,-a);
onvector(-a,0);
onvector(0,a);
end;
begin
Task('pp4');
ToPoint(7,17);
pendown;
a:=15;
for i:=1 to 8 do
begin
square(a);
penup;
onvector(1,-1);
a:=a-2;
end;
ToPoint(0,0);
<span>end. </span>
Var i:integer;
n: array [1..8] of integer;
BEGIN
For i:=1 to 8 do
begin
Writeln('Vvedite element massiva');
Read(n[i]);
end;
Writeln;
For i:=8 downto 1 do
Writeln(n[i]);
Readln;
Readln;
END.
Вот эти числа:
10001011 - 139
10111000 - 184
10011011 -155
10110100 - 180
Но, скорее всего, единица в последнем разряде указывает на знак, тогда:
<span>0001011 - 11
</span><span>0111000 - 56
</span><span>0011011 - 27
</span><span>0110100 - 52
</span>Соответственно, только первое число меньше 16