В некоторой кодировке на каждый символ отводится 3 байта. Определите информационный объём текста из 54 символов. Формула: V= k умножить на i

Function leng(var x,y,x1,y1: real): real;
begin
  leng:=sqrt(sqr(x-x1)+sqr(y-y1));
end;

// основная программа
var x1,y1,x2,y2,x3,y3,p: real;
begin
  write('координаты вершин  x1 y1 x2 y2 x3 y3 через пробел:  ');
  readln(x1,y1,x2,y2,x3,y3);
  if (leng(x2,y2,x1,y1) + leng(x3,y3,x2,y2) = leng(x3,y3,x1,y1)) or
     (leng(x2,y2,x1,y1) + leng(x3,y3,x1,y1) = leng(x3,y3,x2,y2)) or
     (leng(x3,y3,x2,y2) + leng(x3,y3,x1,y1) = leng(x2,y2,x1,y1)) then
  writeln('точки лежат на одной прямой')
  else 
  begin
    p:=leng(x2,y2,x1,y1)+leng(x3,y3,x2,y2)+leng(x3,y3,x1,y1);
    writeln('периметр: ',p:7:3);
  end;
end.

координаты вершин  x1 y1 x2 y2 x3 y3 через пробел:  3 4 7 2 6 5
периметр:  10.797

координаты вершин  x1 y1 x2 y2 x3 y3 через пробел:  1 2 3 4 5 6
точки лежат на одной прямой

ЯП: С++ | можно не писать std:: , если использовать пространство имен: using namespace std;

#include <iostream>

int main() {

const int SIZE = 10;

int regim, sum, max, count;

int arr[SIZE];

for (int i = 0; i < SIZE; i++)

{

 std::cin >> arr[i]; // вводим элементы массива

 std::cout << arr[i] << "\t"; // выводим массив в консоль

}

std::cin >> regim;

if ((regim > 0) && (regim < 4))

{

 if (regim == 1)

 {

  for (int i = 0; i < SIZE; i++)

  {

   sum += arr[i]; // или sum = sum + arr[i];

  }

  std::cout << "Сумма элементов массива = " << sum << std::endl;

 }

 else if (regim == 2)

 {

  max = arr[0];

  for (int i = 0; i < SIZE; i++)

  {

   if (max < arr[i])

    max = arr[i];

  }

  std::cout << "Максимальный элемент в массиве = " << max << std::endl;

 }

 else

 {

  for (int i = 0; i < SIZE; i++)

  {

   if (arr[i] < 0)

    count++;

  }

  std::cout << "Число отрицательных элементов в массиве = " << count << std::endl;

 }

}

else

 std::cout << "Доступен только 1-3 режим!" << std::endl;

return 0;

}