Вывести ** экран числа следующим образом: 5 5 5 5 5 5 5 5 5 5 5 5 5 5 5

Question

Вывести на экран числа следующим образом:
5
5 5
5 5 5
5 5 5 5
5 5 5 5 5

Answer 1

1. Короткая версия:

// PascalABC.NET 3.1, сборка 1195 от 09.03.2016
begin
  Range(1,5).Select(x->x*'5 ').Println(NewLine);
end.

Результат:
5
5 5
5 5 5
5 5 5 5
5 5 5 5 5

2. А так учат в школе...

// PascalABC.NET 3.1, сборка 1195 от 09.03.2016
var
  i,j:integer;
begin
  for i:=1 to 5 do begin
    for j:=1 to i do Write('5 ');
    Writeln
  end
end.