Просмотр полной версии : Помогите написать программу!
Срочно нужна программа на завтра,извините что не в той теме:
Над написать программу и запустить ее на выполнение. Вычислить площадь круга, если известна его длина.
Очень прошу, нужна на завтра! Помогите плизззззз
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.
Приват?зачем на паскале константу обьявлять?просто пишешь pi .
Площадь круга=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
смешно
vBulletin® v3.8.14, Copyright ©2000-2026, vBulletin Solutions, Inc. Перевод: zCarot