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

53 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 Dizideki Bir Elemanı Döngü İle Arama Örneği

Delphi Dizinin İlk ve Son Elemanının Aynı Olup Olmamasını Bulma Ö ...

Delphi Bir Stringteki Küçük Harfleri Öne Alma Örneği

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

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