Найти сумму цифр четырехзначного числа через цикл с постусловием

Var a,s:integer;
begin
readln (a);
repeat 
s:=s+a mod 10;
a:=a div 10;
until a=0;
writeln (s);
end.

№1

#include <iostream>

#include <string.h>

using namespace std;

int main() {

setlocale(LC_ALL, "Rus");

char st[100];

char rm[10] = " РМ";

gets_s(st);

strcat_s(st, rm);

cout << st;

return 0;

}

№2

#include <iostream>

using namespace std;

int main() {

setlocale(LC_ALL, "Rus");

string st = "получены результаты контрольной работы";

cout << sizeof(st) << endl;

cout << st.find("результаты") << endl;

st.insert(st.find("результаты") + 10, " итоговой");

cout << st;

return 0;

}

Объяснение:

Здесь                  Здесь

показатель      результат

0                              1

1                               2

2                              4

3                              8

4                              16

5                              32

6                              64

7                              128

8                              256

9                              512

10                             1024

11                             2048

12                             4096

13                             8192

14                             16384

15                             32768

16                             65536

17                             131072

18                             262144

19                             524288

20                             1048576

21                             2097152

22                             4194304

23                             8388608

24                             16777216

25                             33554432

26                             67108864

27                             134217728

28                             268435456

29                             536870912

30                             1073741824