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

76 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 Dört İşlem Yapan Örnek

Delphi Bir Listede Birden Çok Olan Elemanları Göstermek

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

Delphi Bir Stringdeki Her Karakterin Sayısını Bulma Örneği

Delphi Rastgele Sayılardan En Büyük ve En Küçüğü Bulma Örneği