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

35 Okunma Delphi

"Delphi" Programlama dilinde "Bir Sayının 5'in Katı Olup Olmadığını Gösteren Örnek" ile ilgili örnek kod aşağıda gösterilmiştir. 

program Main;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
  number: Integer;
begin
  Write('Bir Sayı Girin: ');
  Readln(number);
  if number mod 5 = 0 then
    WriteLn(number, ' sayısı 5 in katıdır.')
  else
    WriteLn(number, ' sayısı 5 in katı değildir.');
end.
Beş Sayı Bölüm Mod Kat Delphi

İlginizi Çekebilir

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

Delphi Fibonacci Serisinde N'inci Terimi Bulma Örneği

Delphi Üç Kenarı Verilen Bir Üçgenin Alanını Bulma

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

Delphi 1'den N'e Kadar Asal Sayıları Bulma Örneği