Решение задачи For 16

#include <bits/stdc++.h>
using namespace std;

int main() {
	srand((int)time(0));
	int N;
	N = rand() % 10 + 1;
	float A;
	A = rand() % 100 / 10.0;
	cout << "Number A: " << A << endl;
	cout << "Number N: " << N << endl;
	
	double p = 1;
	for(int i = 1; i <= N; i++) {
		p *= A;
		cout << A << " power "<< i <<" = " << p << endl;
	}
	return 0;
}

import random

N = random.randrange(1,10)
print('N = ', N)
A = random.randrange(-10,10)
print('A = ', A)

P = 1
for i in range(1,N+1):
    P *= A
    print(A," в степени ", i," равно",P)
									

program For16;
var
  A,Rez:Real;
  N, i :Integer;
begin
  Write('Введите A: ');
  Readln(A);
  Write('Введите N: ');
  Readln(N);
  Rez:=1;
  For i:=1  to N do
   begin
    Rez:=Rez*A;
    Writeln(Rez);
   end;
end.