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 1'den 100'e Kadar Asal Sayı Toplamı Örneği

Delphi Fibonacci Serisinde N'inci Terimi Bulma Örneği

Delphi Bir Stringdeki Her Karakterin Sayısını Bulma Örneği

Delphi Bir String İçinde Başka Bir Stringin Adetini Bulma Örneği

Delphi Bir Dizi Kullanarak N Sayının Toplamını Bulma Örneği