lostyazilim
tr.link

C# Değişik bir program

4 Mesajlar 897 Okunma
lstbozum
tr.link

kmalpha kmalpha WM Aracı Kullanıcı
  • Üyelik 11.06.2014
  • Yaş/Cinsiyet 28 / E
  • Meslek Bilişim
  • Konum Bursa
  • Ad Soyad G** P**
  • Mesajlar 203
  • Beğeniler 26 / 22
  • Ticaret 1, (%100)
Fazla yazı paylaşamadım bu aralar, ve güzel bir yazı ile dönüş yapıyorum. Arkadaşlar bu programı kodu şu işe yarıyor. Kullanıcı tarafından girilen sayı aralığındaki (sayılar dâhil), kendi basamakları toplamına tam olarak bölünen (kalansız bölünen) sayıları listeleyen görsel C# programı yazılmak isteniyor. Minimum 1, maksimum 99999 değerleri girilecektir.

Örnek: 24 sayısı 2+4 basamakları toplamı olan 6 sayısına tam bölünüyor. Bunun gibi bir program işte kodlarına gelecek olursak ;

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
using System.Windows.Forms;

namespace WindowsFormsApplication4
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}

private void button1_Click(object sender, EventArgs e)
{
listBox1.Items.Clear();
int s1, s2, bastop,i,birler,onlar,yuzler,binler,onbinler;
s1 = Convert.ToInt32(textBox1.Text);
s2 = Convert.ToInt32(textBox2.Text);
for (i = s1; i <= s2; i++)
{

if (i >= 0 && i <= 9)
{
if (i % i == 0)
{
listBox1.Items.Add(i);
}
}
if (i >= 10 && i <= 99)
{
onlar = i / 10;
birler = i % 10;
bastop = birler + onlar;
if (i % bastop == 0)
{
listBox1.Items.Add(i);
}


if (i >= 100 && i <= 999)
{
birler = i % 10;
onlar = i / 10;
onlar = onlar % 10;
yuzler = i / 100;
bastop = birler + onlar + yuzler;
if (i % bastop == 0)
{
listBox1.Items.Add(i);
}
}

if (i >= 1000 && i <= 9999)
{
binler = i / 1000;
yuzler = i / 100;
yuzler = yuzler % 10;
onlar = i / 10;
onlar = onlar % 10;
birler = i % 10;
bastop = birler + onlar + yuzler + binler;
if (i % bastop == 0)
{
listBox1.Items.Add(i);
}

}
if (i>= 10000 && i<=99999)
{


birler = i % 10;
onlar = i / 10;
onlar = onlar % 10;
yuzler = i / 100;
yuzler = yuzler % 10;
binler = i / 1000;
binler = binler % 10;
onbinler = i / 10000;
bastop = birler + onlar + yuzler + binler + onbinler;
if (i % bastop == 0)
{
listBox1.Items.Add(i);
}

//}
}

}
}
}


Yazının kaynağı ve proje dosyasını buradan indirebilirsiniz.
http://www.gokhanplt.com/c-basamaklara-ayirma-programi/
tayfur

kişi bu mesajı beğendi.

www.gokhanplt.com
wmaraci
reklam

tayfur tayfur Üyeliği Durdurulmuş Banlı Kullanıcı
  • Üyelik 20.04.2015
  • Yaş/Cinsiyet 34 / E
  • Meslek öğrenci
  • Konum Konya
  • Ad Soyad T** C**
  • Mesajlar 173
  • Beğeniler 38 / 29
  • Ticaret 7, (%100)
Bunu c diliyde yapsaniz ,
Kly glsn
 

 

kmalpha kmalpha WM Aracı Kullanıcı
  • Üyelik 11.06.2014
  • Yaş/Cinsiyet 28 / E
  • Meslek Bilişim
  • Konum Bursa
  • Ad Soyad G** P**
  • Mesajlar 203
  • Beğeniler 26 / 22
  • Ticaret 1, (%100)

tayfur adlı üyeden alıntı

Bunu c diliyde yapsaniz ,
Kly glsn

hocam dönüştürmek o kadar zor olmasa gerek matematiksel işlemler zaten aynı
 

 

www.gokhanplt.com

tayfur tayfur Üyeliği Durdurulmuş Banlı Kullanıcı
  • Üyelik 20.04.2015
  • Yaş/Cinsiyet 34 / E
  • Meslek öğrenci
  • Konum Konya
  • Ad Soyad T** C**
  • Mesajlar 173
  • Beğeniler 38 / 29
  • Ticaret 7, (%100)
Hocam o dili bilmiyorum ama dediginize de katiliyorum
 

 

wmaraci
wmaraci
Site Ayarları
  • Tema Seçeneği
  • Site Sesleri
  • Bildirimler
  • Özel Mesaj Al