MENAMPILKAN PENJUMLAHAN

MENAMPILKAN PENJUMLAHAN

          Menampilkan hasil penjumlahan dalam progam, langsung saja kalo pengen tau seperti apa bisa dilihat gambar dibawah ini.

Jika pengen mencobanya silahkan mencoba script nya dibawah ini :

program Project2;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
 i,A,JUM:integer;
begin
  I:=1;JUM:=0;
  writeln;
  writeln('Nama : Maisirotul Rizka');
  writeln('Nim  : 114224022');
  writeln('========================');
  writeln;
 while I<= 10 do
    BEGIN
      A:=I;
      JUM:=JUM+A;
      Writeln(A);
      I:=I+1;
    END;
    WRITELN('1+2+3.......+10=',JUM);
    READLN;
  { TODO -oUser -cConsole Main : Insert code here }
end.

Selamat mencoba gays .. ^^