Составьте программу которая вводит с клавиатуры значения a,x. если a=1, то печатается x3. если a=2, то печатается x5

Var a,x:integer;
begin
read(a,x);
if a=1 then write(x*x*x); else
if a=2 then write(x*x*x*x*x); // power для слабых духом.
end.