Ну если под целыми числами подразумевать не отрицательные числа, то
2^5 = 32, 2 в степени 5.
от 0 до 31, наименьшее и наибольшие числа в диапозоне
1.
var a1,an,d,n,i:integer;
begin
readln(a1,d);
readln(n);
an:=a1;
for i:=2 to n do an:=an+d;
writeln('an = ',an);
end.
2.
function f(a1,d,k:integer):integer;
begin
if k=1 then f:=a1 else f:=f(a1,d,k-1)+d;
end;
var a,r,n:integer;
begin
readln(a,r);
readln(n);
writeln('an = ',f(a,r,n));
end.
Пример:
3 2
5
<span>an = 11</span>
<span>К растровым редакторам относятся программы:
B) </span>
Все три объединил в одну. Смотри в приложении.