var a,b,c:integer;
begin
writeln('введите число и степень'); {здесь прост программа тебя спрашивает какие числа}
read(a,b); {здесь программа читает их}
case b of {тут выполняется условие типа если b и идут сами степени}
0: writeln(1);
1: writeln(a); {здесь что программа выдаст если ты напишешь такую степень}
2: writeln (a*a);
3: writeln (a*a*a);
4: writeln (a*a*a*a);
5: writeln (a*a*a*a*a);
6: writeln (a*a*a*a*a*a);
7: writeln (a*a*a*a*a*a*a);
8: writeln (a*a*a*a*a*a*a*a);
9: writeln (a*a*a*a*a*a*a*a*a);
end;
end.
для перевода из десятичной системы счисления в двоичную, надо разделить представленное число на 2 с остатком (если имеется). и продолжать каждый раз делить часное до тех пор пока часное не перестанет делится на 2 нацело. т.е. = 1. и записать все остатки начиная с последнего часного в обратном порядке их получения.
110101| 2
110100 55050| 2
1 55050 27525| 2
0 27524 13762| 2
1 13762 6881| 2
0 6880 3440| 2
1 3440 1720| 2
0 1720 860| 2
0 860 430| 2
0 430 215| 2
0 214 107| 2
1 106 53| 2
1 52 26| 2
1 26 13| 2
0 12 6| 2
1 6 3|2
0 21
1
110101 = 11010111000010101
два других числа считаются точно также
100001 = 11000011010100001
11001 = 10101011111001
print(105+5)
print(50-15)
print(6*(-8))
print(81/9)
print(41%7)
print(65//15)
print(17**5)