Question

Написать программу в Паскаль, которая печатает числа в следующей последовательности, через вложенный цикл: 1 2 2 3 3 3 4 4 4 4 5 5 5 5 5

Answer 1

===== PascalABC.NET =====

begin

 var n := ReadInteger('Число строк?');

 for var i := 1 to n do

 begin

   for var j := 1 to i do

     Print(i);

   Writeln

 end

end.

Answer 2

Ответ:

Объяснение:

var i,j:integer;

begin

for i:=1 to 5 do begin

for j:=1 to 5 do write(j);

Writeln();

end;

end.

Answer 3

Конечно! Вот пример программы на языке Паскаль, которая печатает числа в указанной последовательности с использованием вложенного цикла:

pascalCopy code
program PrintNumberSequence;
var
  number, count, i: integer;
begin
  number := 1;
  
  for count := 1 to 5 do
  begin
    for i := 1 to count do
    begin
      write(number, ' ');
    end;
    
    number := number + 1;
  end;
end.

Эта программа будет выводить числа в следующей последовательности: 1 2 2 3 3 3 4 4 4 4 5 5 5 5 5.