Anayagar 27 октября 2019 в 08:00
СРОЧНО!ПАСКАЛЬ
Напишите программу, содержащую процедуру print, которая выводит последовательность: AABABCABCD ... ABC ... XYZ
Procedure print();
var i,j: char;
begin
for i := A to Z do
for j := A to i do
write(j)
end;
begin
print()
end.
Для комментирования необходимо зарегистрироваться на сайте