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 Dictionary'deki Değerler İle Listenin Elemanlarını Eşleşti ...

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

Delphi Sayıların Geometrik Ortalamasını Bulma Örneği

Delphi 1'den N'e Kadar Olan Çift Sayıların Toplamını Bulma Örneği

Delphi Bir Dizi Tam Sayının Ortalamasını Bulma