Решение задачи Proc 7

#include <bits/stdc++.h>

using namespace std;
void func (int k)
{
    while(k){
        cout << k % 10;
        k/=10;
    }
    cout << endl;
}
int main()
{



    int k, c, s;
    for(int i = 0; i < 5; ++i){ //
        cin >> k; //вводим число
        func(k); // вызываем функцию
    }

    return 0;
}

import random

def InvertDigits(K):
    s = str(K['K'])
    s_new = s[::-1]
    K['K'] = int(s_new)
        
    
R = {'K' : None}
for i in range(5):
    R['K'] = random.randrange(1,10000)
    print("Число ",i+1,": ", R['K'])
    InvertDigits(R)
    print('Измененное = ', R['K'])
    print()
									

program Proc7;
 
procedure InvertDigits(var K:Integer);
var
  TempI:Integer;
begin
  TempI:=0;
  while (k<>0) do
  begin
    TempI:=TempI*10+(K mod 10);
    K:=K div 10;
  end;
  K:=TempI;
end;
 
var
  k,I:Integer;
begin
 for i:=1 to 5 do
  begin
   Write('Введите число K: ');
   Readln(k);
   InvertDigits(k);
   Writeln('Обратный порядок цифр: ',K);
  end;
end.