6.3.. Napisati program za ispis brojeva Pi i 1/Pi na 4 decimale.
Opis programa: Turbo Pascal olakšava posao programerima jer broj Pi se ne mora unositi nego ga koristimo kao varijablu Pi. (Pi=3. 14159265363E+00 ).
Za objašnjenje:
*** |
Listing programa |
Opis |
1 |
PROGRAM p06311024; |
|
2 |
VAR |
|
3 |
n: Real; |
|
4 |
BEGIN |
|
5 |
WRITELN('Pi = ', pi); |
3. 14159265363E+00 |
6 |
WRITELN('Pi = ', pi:8:4); |
3.1416 |
7 |
WRITELN('1/Pi = ', 1/pi:8:4); |
0.3183 |
8 |
READLN;
END. |
|
Listing programa:
PROGRAM p06311024;
BEGIN
WRITELN('Pi = ', pi);
WRITELN('Pi = ', pi:8:4);
WRITELN('1/Pi = ', 1/pi:8:4);
READLN;
END.
Ispis na ekranu:
Index
|
|