С++, написать программу
Рассчитать интегралы двумя методом
прямоугольников и метод трапеций).
Написать программу для расчета определенного
дифференциала.

x, y = map(float, input().split())

# f - формула

f1 = f2 = f3 = f4 = False

F1 = (x-4)*(x-4) + (y-4)*(y-4)

F2 = x*x + (y-3)*(y-3)

F3 = (x-3)*(x-3)+y*y

if (x * x + y * y <= 25) and (x * x + y * y >= 9):

f1 = True

if ((x * x + y * y <= 25) and (y > x + 5)) or ((x * x + y * y <= 25) and (y < x - 5)) \

or ((x * x + y * y <= 25) and ((x > 0 and y > 0) or (x < 0 and y < 0))):

f2 = True

if F1 == 9 or F2 == 9 or F3 == 9 or ((F1 <= 9 and F2 > 9 and F3 > 9) or (F2 <= 9 and F1 > 9 and F3 > 9) or (F3 <= 9 and F1 > 9 and F2 > 9)):

f3 = True

if (x * x + (y - 3) * (y - 3) <= 16) and (y <= 2 or y >= 5):

f4 = True

print("1:", f1)

print("2:", f2)

print("3:", f3)

print("4:", f4)

1.
var
  s: string;
  i, count: integer;
begin
  writeln('Vvedite stroky: ');
  readln(s);
  for i := 1 to length(s) - 2 do
    if copy(s, i, 3) = 'abc' then
      count := count + 1;
  writeln('Kol-vo: ', count);
end.
2.
var
  s1, s2: string;
  i, len1, len2: integer;
begin
  writeln('Vvedite stroky 1: ');
  readln(s1);
  writeln('Vvedite stroky 2: ');
  readln(s2);
  len1 := length(s1);
  len2 := length(s2);
  if len1 > len2 then writeln('1 stroka dlinnee')
  else if len1 < len2 then writeln('2 stroka dlinnee')
  else writeln('dlini strok ravnie')
end.
3.
var
  s1, s2, s3: string;
begin
  writeln('Vvedite stroky 1: ');
  readln(s1);
  writeln('Vvedite stroky 2: ');
  readln(s2);
  s3 := s1[1] + s1[2] + s2[1] + s2[2];
  writeln('Novaja stroka: ', s3);
end.