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

199 Okunma Delphi

"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.
Toplam Sayı 100 Döngü Delphi

İlginizi Çekebilir

Delphi Bir Dizi Gerçek Sayının Çarpımını Bulma Örneği

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

Delphi 1'den N'e Kadar Asal Sayıları Bulma Örneği

Delphi Üç Kenarı Verilen Bir Üçgenin Alanını Bulma

Delphi 1 İle 100 Arasında 3'e Bölünebilenleri Bulma Örneği