Program Segitiga Tanpa Double Looping

Pada post sebelumnya, saya menulis program segitiga dengan menggunakan double looping. Di post yang satu ini, saya akan menulis program segitiga tetap dengan looping for-do, namun tidak menggunakan double looping. Looping yang dibutuhkan hanya satu kali. Penasaran? Check this post!!

KuraKura berpikir untuk tidak menggunakan double looping dengan harapan program dapat berjalan dengan algoritma yang lebih simpel. Dari permasalahan awal KuraKura, maka KuraKura mendapat ide awal yaitu dengan menggunakan string yang akan ditambah jumlah karakter nya seiring single looping berjalan.

Masih bingung? berikut code nya

Program Segitiga_tanpa_double_looping;

var

  n,i:longint;

  s:string;

begin

  readln(n);

  s:='x';

  for i:=1 to n do

  begin

    writeln(s);

    s:=s+'x';

  end;

end.

Jangan lupa di coba ya. Jika ada pertanyaan atau masalah dengan code diatas, silahkan comment di post ini juga atau tinggalkan pesan di chat box yang berada pada gadget di sebelah kanan. Thanks sudah membaca kurakura programmer.

Bye! Salam KuraKura :)