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

53 Okunma Delphi

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

program ConsoleApplicationTest;

{$APPTYPE CONSOLE}

var
  toplam, i: Integer;
begin
  toplam := 0;
  for i := 0 to 100 do
  begin
    if i mod 2 = 0 then
      toplam := toplam + i;
  end;
  WriteLn(toplam);
  ReadLn;
end.
Toplam Sayı 100 Çift Mod Delphi

İlginizi Çekebilir

Delphi Bir Sayının Faktöriyelini Bulma Örneği

Delphi Bir Stringde Tam Sayılar Dışındaki Karakterleri Kaldırma Ö ...

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

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

Delphi Dictionary'deki Değerler İle Listenin Elemanlarını Eşleşti ...