Delphi 1'den 100'e Kadar Sayı Toplam Örneği

"Delphi" Programlama dilinde "1'den 100'e Kadar Sayı Toplam Örneği" ile ilgili kod örneği aşağıda verilmiştir.

program ConsoleApplicationTest;

{$APPTYPE CONSOLE}

uses
  System.SysUtils;

var
  toplam, i: Integer;

begin
  toplam := 0;
  for i := 0 to 100 do begin
    toplam := toplam + i;
  end;
  WriteLn(toplam);
  ReadLn;
end.



İlginizi Çekebilir

Delphi Rastgele Sayılardan En Büyük ve En Küçüğü Bulma Örneği

Delphi Döngü İle Bir Dizideki En Büyük Sayıyı Bulma Örneği

Delphi Bir Sayının Tek Mi Çift Mi Olduğunu Göstermek

Delphi Bir Dictionary'i Filtreleyip Yeni Bir Dictionary Yaratma Ö ...

Delphi While Döngüsü İle 10 Sayının Ortalamasını Bulma Örneği