ANTICHAT — форум по информационной безопасности, OSINT и технологиям

#include <iostream> //библиотека потокового ввода/вывода   
#include <conio.h> //нужно для использования getch()
using namespace std;//для работы iostream нам нужно выбрать пространство имён std

int main(){
    int i,j,a,b,p;
    
    cout << "BBeguTE pa3Mep MACCuBA X"<<endl;
    cin >> a;
    cout << "BBeguTE pa3Mep MACCuBA Y"<<endl;
    cin >> b;
    
    int X[a];
    int Y[b];
    int Z[a+b];    
    
    cout << "BBeguTE E/|EMEHTb| MACCuBA X"<<endl;
    for(i=0;i<a;i++){
    cin >> X[i];}    
    
    cout << "BBeguTE E/|EMEHTb| MACCuBA Y"<<endl;
    for(i=0;i<b;i++){
    cin >> Y[i];}  
    
    //Вносим элементы массивов Х и Y в массив Z
    for(i=0;i<a;i++){
    Z[i]=X[i];}
    for(i=0;i<b;i++){
    Z[i+a]=Y[i];}
    
    //Сортируем массив Z пузырьковым методом (см.Пузырьковая сортировка)
    for(j=0;j<(a+b);j++){
        for(i=0;i<(a+b);i++){
            if(Z[i]>Z[i+1]){
             p=Z[i];
             Z[i]=Z[i+1];
             Z[i+1]=p;
             }
        }
    }
    
    //Выводим получившийся массив на экран
    for(i=0;i<(a+b);i++){
    cout << Z[i] << " ";}

getch();//Ожидание нажатия любой клавиши
return 0;
}

#include <stdio.h>
#include <conio.h>
#include <math.h>
#include <string.h>
#pragma hdrstop

//------------------------------------------------
#pragma argsused

int CharToInt(char alpha)
{
  if(alpha<58 )
    return alpha - 48;
  else
    return alpha - 55;
}

int ConvertToDec(char *input , int sinp )
{
  int sum = 0;
  int pow = 1;
  for(int i = strlen(input)-1; i>=0; i--)
  {
    sum+=CharToInt(input[i]) * pow;
    pow*=sinp;
  }
  return sum ;
}

char *convertX(int input, int sout, char *out)
{
  while(input!=0)
  {
    double j = input%sout;
    input/=sout;
    out--;
    if(j<10)
      *out = 48 + j;
    else
      *out = 55 + j;
  }
  return out;
}

int main(int argc, char* argv[])
{
  printf("Vvedite iszhodnoe chislo: " );
  char input[32] = "";
  scanf("%s", &input);

  printf("\nVvedite nachalnuiu codirovku: ");
  int sinp;
  scanf("%i", &sinp);

  printf("\nVvedite conechnuiu codirovku: ");
  int sout;
  scanf("%i", &sout);

  printf("\n\n= ");

  char output[32];
  output[31] = 0;
  printf("%s", convertX(ConvertToDec(input, sinp), sout, output+31));

  printf("\n\nNazsmite ljubuju klavisu...");
  getch();
  return 0;
}

Program TitanovieIaica;
Var chislo,i,vivod,number,delit,kolvo:integer;
Begin
vivod:=0; //вывод целого числа, показывающего номера полож членов послед
i:=1; //счетчег
delit:=1; //делитель для разбиения числа
kolvo:=1; //переменная для счетчика цифр
repeat //цикл для ввода цифр последовательности
writeln('Vvedite chislo posledovatelnosti:');
readln(chislo); //вводим число
if chislo>0 then //проверка - положительное ли число, если да, то
Begin
vivod:=vivod*10+i; //тут формируем число ,В котором каждая циыра - номер положительного члена последов.
End;
i:=i+1; //этим счетчиком определяется номер полож. члена в последов.
until chislo=0; //если член последов = 0, то завершаем ввод
if vivod>10 then //если чисел было больше чем 1, то
Begin
number:=vivod; //присваиваем переменной для подсчета кол-ва цифр знач. числа с номерами членов
while number>10 do //пока число >10 выполняем:
Begin
number:=number div number; //целочисленное деление на 10
kolvo:=kolvo+1; //подсчет количества цифр
end;
repeat
delit:=delit*10; //считаем первый делитель
kolvo:=kolvo-1;
until kolvo=1;
End
else writeln('Nomer posledovatelnosti:',vivod);// если число было1, то выводим его
while vivod>10 do //тут разбиваем число с нормерами членов последовательности на цифры если оно больше 10
begin
write(vivod div delit, ' ');//выводим член последовательности
vivod:=vivod mod delit; //убираем из числа выведенную цифру
delit:=delit div 10; //убираем из делителя 0
end;
write(vivod); //выводим последнюю цифру числа
END.

Vvedite chislo posledovatelnosti:
12
Vvedite chislo posledovatelnosti:
12
Vvedite chislo posledovatelnosti:
12
Vvedite chislo posledovatelnosti:
12
Vvedite chislo posledovatelnosti:
2
Vvedite chislo posledovatelnosti:
0
1234 5

Vvedite chislo posledovatelnosti:
12
Vvedite chislo posledovatelnosti:
12
Vvedite chislo posledovatelnosti:
12
Vvedite chislo posledovatelnosti:
12
Vvedite chislo posledovatelnosti:
2
Vvedite chislo posledovatelnosti:
0
1 2 3 4 5