IRC ve mIRC Kullanıcılarının Buluşma Noktası
  Mobil Sohbet, Sohbet ve Sohbet Odaları




Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 11 Temmuz 2014, 11:09   #1
Çevrimdışı
Dairenin Çevre ve Alanını Hesaplama


-- Sponsor Baglantı --


Pascal programlama dilinde yazılmış bu programda dairenin alan ve çevresini aşağıdaki şartlarda hesaplayan bir prosedür yazılmıştır.

a) Parametresiz olarak

b) Dairenin yarıçapı değer parametresi olarak prosedüre gitsin

c) Alan ve çevre değerleri değişken parametresi olarak prosedüre gitsin

Program Kodu:

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
uses crt; var r,pi,cevre,alan:real; Procedure daire; (*a*) Begin alan:=pi*r*r; cevre:=2*pi*r; writeln('Daire alani : ',alan); writeln('Daire cevre : ',cevre); end; Procedure daire2(r1:real); (*b*) Begin alan:=pi*r1*r1; cevre:=2*pi*r1; writeln('Daire2 alani : ',alan); writeln('Daire2 cevre : ',cevre); end; Procedure daire3(var alan,cevre:real); (*c*) Begin alan:=pi*r*r; cevre:=2*pi*r; end; Begin writeln('Daire alan/cevre hesabi icin yaricapi giriniz : ..'); readln(r); pi:=3.14; daire; alan:=0; cevre:=0; daire2(r); alan:=0; cevre:=0; daire3(alan,cevre); writeln('Daire2 alani : ',alan); writeln('Daire2 cevre : ',cevre); readln; End.

Pascal programlama dilinde yazılmış bu programda dairenin alan ve çevresini aşağıdaki şartlarda hesaplayan bir prosedür yazılmıştır.

a) Parametresiz olarak

b) Dairenin yarıçapı değer parametresi olarak prosedüre gitsin

c) Alan ve çevre değerleri değişken parametresi olarak prosedüre gitsin

Program Kodu:

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
uses crt; var r,pi,cevre,alan:real; Procedure daire; (*a*) Begin alan:=pi*r*r; cevre:=2*pi*r; writeln('Daire alani : ',alan); writeln('Daire cevre : ',cevre); end; Procedure daire2(r1:real); (*b*) Begin alan:=pi*r1*r1; cevre:=2*pi*r1; writeln('Daire2 alani : ',alan); writeln('Daire2 cevre : ',cevre); end; Procedure daire3(var alan,cevre:real); (*c*) Begin alan:=pi*r*r; cevre:=2*pi*r; end; Begin writeln('Daire alan/cevre hesabi icin yaricapi giriniz : ..'); readln(r); pi:=3.14; daire; alan:=0; cevre:=0; daire2(r); alan:=0; cevre:=0; daire3(alan,cevre); writeln('Daire2 alani : ',alan); writeln('Daire2 cevre : ',cevre); readln; End.

__________________
şah hatayi'm muhabbete bakarım
ben doluyum ben dolana akarım


Maya
Kullanıcı imzalarındaki bağlantı ve resimleri görebilmek için en az 20 mesaja sahip olmanız gerekir ya da üye girişi yapmanız gerekir.
  Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
radyo44.com.tr
Cevapla

Etiketler
alanını, cevre, dairenin, hesaplama, ve

Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Dairenin Alanı ve Çevresi Violent Geometri 0 30 Kasım 2013 22:00
Evinizin Her Alanını Kullanın Zen Ev Dekorasyonu 0 25 Ekim 2012 11:16
Dodekahedron Şekil - Dodekahedronun Alanını Hesaplama Liaaa Ödev ve Tezler 0 06 Temmuz 2012 14:35
Çemberin Çevresi - Dairenin Alanı - P Nin Değeri Liaaa Geometri 0 31 Mart 2012 19:21