Петя записал ip-адрес школьного сервера на листке бумаги и положил его в карман куртки Петина мама случайно постирала куртку вместе с запиской после стирки Петя обнаружил в кармане четыре обрывка с фрагментами ip-адреса эти фрагменты обозначены буквами а б в и г Установите ip -адрес.в ответе напишите укажите последовательность IP - адресу.ответ должен быть в виде АБВГ​

#include <iostream>     // подключение заголовочного файла для возможности cin, cout

using namespace std;    // чтобы каждый раз не писать std перед cin, cout

int main()              // главная процедура

{

 setlocale(LC_ALL, "Russian");   // для вывода текста русского языка

 int k, l;                       // объявление целых переменных

 cout << "\nВведите k: ";        // вывод сообщения

 cin >> k;                       // ввод с клавиатуры

 cout << "\nВведите l: ";        // вывод сообщения

 cin >> l;                       // ввод с клавиатуры

 if (k != l) {                   // если k не равно l

   if (k > l)                    // находим большее число и меняем меньшее на большее

     l = k;

   else

     k = l;

 }

 else {                          // иначе k равно l

   k = 0;                        // присваиваем нулевые значения

   l = 0;

 }

 cout << "\n\nk = " << k;        // вывод новых значений

 cout << "\nl = " << l << "\n";

}

Объяснение: в комментариях к программе

PascalABC.NET 3.4.2, сборка 1859 от 08.11.2018Внимание! Если программа не работает, обновите версию!

procedure Ввод(a: array of string);

begin

 for var i := 0 to a.High do

   a[i] := ReadlnString;

end;

procedure Вывод(a: array of string);

begin

 a.PrintLines

end;

function Сумма(a: array of string): integer;

begin

 Result := a.Select(t -> t.ToInteger).Sum;

end;

begin

 var n := ReadlnInteger('Укажите общее количество строк:');

 var a := new string[n];

 Ввод(a);

 Вывод(a);

 Println('Сумма равна', Сумма(a))

end.