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

"Delphi" Programlama dilinde "1 İle 100 Arasında 3'e Bölünebilenleri Bulma Örneği" ile ilgili kod örneği aşağıdadır.

var
  i: Integer;
begin
  for i := 1 to 100 do
  begin
    if i mod 3 = 0 then
      WriteLn(i);
  end;
end;



İlginizi Çekebilir

Delphi Bir Dizideki Tek Sayıların Adetini Bulma Örneği

Delphi Dört İşlem Yapan Örnek

Delphi Bir Sayının 5'in Katı Olup Olmadığını Gösteren Örnek

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

Delphi Dizideki Bir Elemanı Döngü İle Arama Örneği