Типы данных. представленные в реляционных базах данных заработной платы -числовой и логический
-логический и тектовый
-текстовый и числовой
-дата и логический​

Procedure Chisla(n : Integer);
var    a : Integer;
begin 
   if (n < 1) then 
WriteLn   
  else 
  begin 
       Read(a);       
if (Abs(a) < 1000) then       
begin           
Chisla(n-1);           
Write(a,' ');       
 end       
else           
 Chisla(n);   
 end;end; function ReadN() : Integer;
var   
n : Integer;begin   
Write('n=');   
ReadLn(n);   
if Not(n in [0..1000]) then       
n := ReadN();   
ReadN := n;end; var   
n : Integer; begin   
n := ReadN();   
WriteLn('Введите ', n, ' целых чисел через пробел и нажмите Enter'); 
   Chisla(n);
end.

#include <iostream>

#include <string>

using  namespace std;

int main()

{

string w;

int b;

string arr;

 

getline(cin,w);

cin>>b;

cin.ignore();

getline(cin,arr);

 

if(w == "szyfruj")

{

 for(int i=0; i<arr.size(); i++)

 {

  if(int(arr[i])>=97 &&  int(arr[i])<=122 || int(arr[i])>=65 && int(arr[i])<=90)

  {

   if(int(arr[i])>=97 &&  int(arr[i])<=122)

   {

    if(int(arr[i])+b>122) arr[i]-=26;

    arr[i]+=b;

   }

   else

   {

    if(int (arr[i])+b>90) arr[i]-=26;

    arr[i]+=b;

   }

  }

 }

}

if(w == "odszyfruj")

{

 for(int i=0; i<arr.size(); i++)

 {

  if(int(arr[i])>=97 &&  int(arr[i])<=122 || int(arr[i])>=65 && int(arr[i])<=90)

  {

   if(int(arr[i])>=97 &&  int(arr[i])<=122)

   {

    if(int(arr[i])-b<97) arr[i]+=26;

    arr[i]-=b;

   }

   else

   {

    if(int (arr[i])-b<65) arr[i]+=26;

    arr[i]-=b;

   }

  }

 }

}

cout<<arr;

return 0;

}

Объяснение:

код  на с++ для примера

пункт  со  сдвигом  букв сам  сделаешь  

P. S.  у меня на  5 они  сдвигаются,