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 Dizi Gerçek Sayının Çarpımını Bulma Örneği

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

Delphi Döngü Kullanarak Fibonacci Serisi Yazdırma Örneği

Delphi Sayıların Geometrik Ortalamasını Bulma Örneği

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