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

49 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 Bir Stringin Ortadaki Üç Karakterini Bulma Örneği

Delphi Dizideki Herhangi Bir Konuma Eleman Ekleme Örneği

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

Delphi Bir Stringin İlk Orta ve Son Karakterini Alma Örneği

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