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

204 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 Stringin İlk Orta ve Son Karakterini Alma Örneği

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

Delphi Bir Sayının Rakamlarının Toplamını Bulma Örneği

Delphi Bir Dictionary'i Filtreleyip Yeni Bir Dictionary Yaratma Ö ...

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