помогите написать программу в паскале с помощью оператора выбора(case.. of.. else)...

Question

помогите написать программу в паскале с помощью оператора выбора(case.. of.. else) :

Напишите программу для вычисления степени введённого с клавиатуры числа. Степень в диапазоне 0 .. 9.

p.s: я начинающий в программировании, поэтому прошу попонятней написать.

Answer 1

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.