PDA

Просмотр полной версии : Помогите написать программу!


-slim-
01.12.2008, 21:38
Срочно нужна программа на завтра,извините что не в той теме:
Над написать программу и запустить ее на выполнение. Вычислить площадь круга, если известна его длина.
Очень прошу, нужна на завтра! Помогите плизззззз

devton
01.12.2008, 21:48
3.14zdec!!1
PR-асты атакуют!!111

если ты не понял, в первых 2 строках ты увидишь символы, которые напомнят тебе формулы площади круга и длины окружности :)

crystalbit
01.12.2008, 22:00
S=пr*r
C=2пr

S=C*C/(4п)

вот формула, остальное слабо?

Godfather Bulan
01.12.2008, 22:31
Площадь круга=pi*r^2
Длина окружности=2*pi*r
Скачать файл KRUG.exe (http://dump.ru/file/1270452)
Паскаль:

PROGRAM Ce;
CONST
p1 = 3.14159;
VAR
dlina : Real;
Square, Len : Real;
BEGIN
WriteLn('dlina');

Read (dlina);

Len :=dlina /(2 * p1);

Square := p1 * sqr(Len);

WriteLn('s= ', Square :6:2);
readln;
END.

fatalo
01.12.2008, 23:59
Приват?зачем на паскале константу обьявлять?просто пишешь pi .

k0lbasa
02.12.2008, 00:11
Площадь круга=pi*r^2
Длина окружности=2*pi*r
Скачать файл KRUG.exe (http://dump.ru/file/1270452)
Паскаль:

PROGRAM Ce;
CONST
p1 = 3.14159;
VAR
dlina : Real;
Square, Len : Real;
BEGIN
WriteLn('dlina');

Read (dlina);

Len :=dlina /(2 * p1);

Square := p1 * sqr(Len);

WriteLn('s= ', Square :6:2);
readln;
END.

пинч1111 :D :D

Godfather Bulan
02.12.2008, 00:43
Приват?зачем на паскале константу обьявлять?просто пишешь pi .
а хз почему. но не хочет так пахать....
пинч1111
смешно