- Katılım
- 13 Ocak 2007
- Mesajlar
- 2,298
- Puanları
- 1,866
- Yaş
- 47
Yarı çapı r olan cemberin, cevresi ve alanını hesaplar, cisim küre ise hacmini ve yüzey alanını hesaplar
http://tr.wikipedia.org/wiki/K%C3%BCre_%28geometri%29
http://tr.wikipedia.org/wiki/K%C3%BCre_%28geometri%29
Kod:
FUNCTION FC13 : VOID
(* www.kontrolkalemi.com, programlayan:=elektronikmuh
Bu prg SCL ile matematiksel işlemlerin ne kadar basit old. göstermek için yapılmıştır*)
VAR_INPUT
R:REAL;
END_VAR
VAR_OUTPUT
Cevre,Alan:REAL;
KureHacim,KureYuzeyAlani:REAL;
END_VAR
CONST
pi:=3.1415926535897932384626433832795;
END_CONST
BEGIN
Cevre :=2*pi*R;
Alan :=pi*R*R;
KureHacim :=4/3*pi*R*R*R;
KureYuzeyAlani :=4*pi*R*R;
END_FUNCTION
Son düzenleme: