var n, x, L, F, k, kint, max:integer;
begin
kint := 0;
max := 0;
for n := 2095 to 19402 do begin
x := n;
k := 0;
while x > 0 do begin
k := k + 1;
if k = 1 then
L := x mod 10;
F := x mod 10;
x := x div 10;
end;
if (F > L)and(n mod 10 = 1)and((n div 10)mod 10 = 2)then begin
kint := kint + 1;
if n > max then
max := n;
writeln(kint,' ',max);
end.
Объяснение:
F - первая цифра числа
L - последняя(Слева направо)
код на Python:
import math
x1 = int(input("Введи координату x 1 точки "))
y1 = int(input("Введи координату y 1 точки "))
x2 = int(input("Введи координату x 2 точки "))
y2 = int(input("Введи координату y 2 точки "))
x3 = int(input("Введи координату x 3 точки "))
y3 = int(input("Введи координату y 3 точки "))
a = math.sqrt( pow(x2 - x1, 2) + pow(y2 - y1, 2) )
b = math.sqrt( pow(x3 - x2, 2) + pow(y3 - y2, 2) )
c = math.sqrt( pow(x3 - x1, 2) + pow(y3 - y1, 2) )
p = (a + b + c) / 2
S = math.sqrt( p*(p - a)*(p - b)*(p - c) )
print(S)
x1,x2,x3,y1,y2,y3 - это координаты точек
a,b,c - вычисление длин между координатами
S - вычисление площади по формуле Герона
var n, x, L, F, k, kint, max:integer;
begin
kint := 0;
max := 0;
for n := 2095 to 19402 do begin
x := n;
k := 0;
while x > 0 do begin
k := k + 1;
if k = 1 then
L := x mod 10;
F := x mod 10;
x := x div 10;
end;
if (F > L)and(n mod 10 = 1)and((n div 10)mod 10 = 2)then begin
kint := kint + 1;
if n > max then
max := n;
end;
end;
writeln(kint,' ',max);
end.
Объяснение:
F - первая цифра числа
L - последняя(Слева направо)
код на Python:
import math
x1 = int(input("Введи координату x 1 точки "))
y1 = int(input("Введи координату y 1 точки "))
x2 = int(input("Введи координату x 2 точки "))
y2 = int(input("Введи координату y 2 точки "))
x3 = int(input("Введи координату x 3 точки "))
y3 = int(input("Введи координату y 3 точки "))
a = math.sqrt( pow(x2 - x1, 2) + pow(y2 - y1, 2) )
b = math.sqrt( pow(x3 - x2, 2) + pow(y3 - y2, 2) )
c = math.sqrt( pow(x3 - x1, 2) + pow(y3 - y1, 2) )
p = (a + b + c) / 2
S = math.sqrt( p*(p - a)*(p - b)*(p - c) )
print(S)
Объяснение:
x1,x2,x3,y1,y2,y3 - это координаты точек
a,b,c - вычисление длин между координатами
S - вычисление площади по формуле Герона