Araştırma ve ödevleriniz için her türlü kaynağı ve dokümanı En Geniş Araştırma ve Ödev Sitesi: www.arsivbelge.com ile bulabilir ve İsterseniz siz de kendi belge ve çalışmalarınızı gönderebilirsiniz!
Her türlü ödev ve dokümanı
www.arsivbelge.com ile kolayca bulabilirsiniz!


Araştırmalarınız için Arama Yapın:



Super Oyunlar Oyna

  
Qbasic Programı Örnekleri

                    

www.arsivbelge.com
Qbasic Programı Örnekleri dokümanıyla ilgili bilgi için yazıyı inceleyebilirsiniz. Binlerce kaynak ve araştırmanın yer aldığı www.arsivbelge.com sitemizden ücretsiz yararlanabilirsiniz.
Qbasic Programı Örnekleri başlıklı doküman hakkında bilgi yazının devamında...
Ödev ve Araştırmalarınız için binlerce dokümanı www.arsivbelge.com sitesinde kolayca bulabilirsiniz.

Qbasic Örnek Kodları:

Silindir, Konik, Küre, Küp, Piramit, Kare Prizma, Üçgen Prizma, Dikdörtgen Prizma Şekillerinin Alan ve Hacimlerini QBasic ile Bulan Örnek Program Kodları:

REM SİLİNDİR ALAN VE HACMİ

CLS

INPUT  “SİLİNDİR YÜKSEKLİĞİNİ GİRİNİZ(H):”;  h

INPUT  “ÇEMBER YARIÇAPINI GİRİNİZ(R):”;  r

ALAN = 2 * 3 * r * (r + h)

HACIM = 3 * r * r * h

PRINT “ALANI=”;  ALAN;  “HACMİ=” HACIM

REM KONİK ALAN VE HACMİ

CLS

INPUT  “KONİK YÜKSEKLİĞİNİ GİRİNİZ(H):”;  h

INPUT  “ÇEMBER YARIÇAPINI GİRİNİZ(R):”;  r

sayi = r * r + h * h

KAREKOK = sayi ^ ( 1 / 2 )

ALAN = 3 * r * KAREKOK

HACIM = 3 * r * r * h / 3

PRINT “ALANI=”;  ALAN;  “HACMİ=” HACIM

REM KÜRE  ALAN VE HACMİ

CLS

INPUT  “KÜRE YARIÇAPINI GİRİNİZ(R):”;  r

ALAN = 4 * 3 * r * r

HACIM = 4 * 3 *  r * r * r / 3

PRINT “ALANI=”;  ALAN;  “HACMİ=” HACIM

REM KÜP  ALAN VE HACMİ

CLS

INPUT  “KÜP KENAR UZUNLUĞU GİRİNİZ(A):”;  a

ALAN = 6 * a * a

HACIM = a * a *  a

PRINT “ALANI=”;  ALAN;  “HACMİ=” HACIM

REM PİRAMİT   HACMİ

CLS

INPUT  “PİRAMİT TABAN KENAR UZUNLUĞU GİRİNİZ(A):”;  a

INPUT  “PİRAMİT  YÜKSEKLİĞİNİ GİRİNİZ(H):”;  h

HACIM = a * a  * h / 3

PRINT  “HACMİ=” HACIM

REM KARE PRİZMA  ALAN  VE  HACMİ

CLS

INPUT  “KARE KENARI UZUNLUĞU GİRİNİZ(A):”;  a

INPUT  “YÜKSEKLİK UZUNLUĞU GİRİNİZ(B):”;  b

ALAN =  2 * a * a  +  4 * a * b

HACIM = a * a  * b

PRINT “ALANI=”;  ALAN;  “HACMİ=” HACIM

REM ÜÇGEN  PRİZMA  ALAN  VE  HACMİ

CLS

INPUT  “ÜÇGEN  KENARI UZUNLUĞU GİRİNİZ(A):”;  a

INPUT  “YÜKSEKLİK UZUNLUĞU GİRİNİZ(B):”;  b

sayikarekoku = 3 ^ ( 1 / 2 )

ALAN =  2 * a*a * sayikarekoku / 4 +  3 * a * b

HACIM = b * a*a * sayikarekoku / 4

PRINT “ALANI=”;  ALAN;  “HACMİ=” HACIM

REM DİKDÖRTGEN  PRİZMA  ALAN  VE  HACMİ

CLS

INPUT  “A KENAR UZUNLUĞU GİRİNİZ(A):”;  a

INPUT  “B KENAR UZUNLUĞU GİRİNİZ (B):”;  b

INPUT  “C KENAR UZUNLUĞU GİRİNİZ (C):”;  c

ALAN =  2 * (a * b  +  b * c  +  a * c)

HACIM = a * b * c

PRINT “ALANI=”;  ALAN;  “HACMİ=” HACIM

Yazan: Ümit Sert


Ekleyen:Ümit SERT
Kaynak:(Alıntıdır)
Aradığınız Dokümanı Bulamadıysanız, Farklı Araştırmalar Yapmak İstiyorsanız Site İçi Arama Yapabilirsiniz!

Ödev ve Araştırmalarınız için www.arsivbelge.com Sitesinde Kaynak Arayın:


Ödev ve Araştırmalarınız için Arama Yapın:
     Benzer Dokümanları İnceleyin
Matlab Program Örnekleri(14565)

23 Nisan Konuşma Metinleri, Güzel sözler ve Şiirler(4420)

3D Studio Max - 3DS Max(1800)

Bilgisayar Programcılığı ve Mesleki Özellikler(1537)

Radyo Programı Yapım Aşamaları(1378)

          Tanıtım Yazıları
      
Türkçe İtalyanca ve Almanca Cümle Çevirisi İçin Birimçevir Sitesi

Esenyurt, Beylikdüzü ve Kartal Bölgelerinde Satılık Daire İlanları

Belge Çevirisi

Tanıtım Yazılarınızı Yayınlamak İçin Tıklayın





Diğer Dökümanlarımızı görmek için: www.arsivbelge.com tıklayın.          

Yorum Yaz          
Öncelikle Yandaki İşlemin Sonucunu Yazın: İşlemin Sonucunu Kutucuğa Yazınız!
Ad Soyad:
          
Yorumunuz site yönetimi tarafından onaylandıktan sonra yayınlanacaktır!