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

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

int main() {
	srand((int)time(0));
	int A = rand() % 10 + 1;
	int B = A + rand() % 10 + 1;	
	cout << "A = " << A << endl;
	cout << "B = " << B << endl;
	
	int k = 1;
	for(int i = A; i <= B; i++) {
		for(int j = 1; j <= k; j++)
			cout << i << " ";
		cout << endl;
		k += 1;	
	}

	return 0;
}

import random

A = random.randrange(1,11)
B = random.randrange(A+1,21)

print("A = ",A)
print("B = ",B)
print()

K = 1
for i in range(A,B+1):
    for j in range(0,K):
        print(i,end=" ")
    print()
    K += 1
									

program For40;
var
  A, B, i, i2 :Integer;
begin
  Write('Введите A: ');
  Readln(A);
  Write('Введите B: ');
  Readln(B);
  for i:=0 to B-A do
   for i2:=0 to i do Writeln(A+i);
end.