ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
Помогите написать программу! |

01.12.2008, 21:38
|
|
Познающий
Регистрация: 25.05.2007
Сообщений: 56
Провел на форуме: 154266
Репутация:
27
|
|
Помогите написать программу!
Срочно нужна программа на завтра,извините что не в той теме:
Над написать программу и запустить ее на выполнение. Вычислить площадь круга, если известна его длина.
Очень прошу, нужна на завтра! Помогите плизззззз
|
|
|

01.12.2008, 21:48
|
|
Участник форума
Регистрация: 26.10.2007
Сообщений: 283
Провел на форуме: 2605910
Репутация:
212
|
|
3.14zdec!!1
PR-асты атакуют!!111
если ты не понял, в первых 2 строках ты увидишь символы, которые напомнят тебе формулы площади круга и длины окружности 
|
|
|

01.12.2008, 22:00
|
|
Участник форума
Регистрация: 06.06.2008
Сообщений: 171
Провел на форуме: 1085601
Репутация:
110
|
|
S=пr*r
C=2пr
S=C*C/(4п)
вот формула, остальное слабо?
|
|
|

01.12.2008, 22:31
|
|
Постоянный
Регистрация: 18.03.2008
Сообщений: 411
Провел на форуме: 7469280
Репутация:
2389
|
|
Площадь круга=pi*r^2
Длина окружности=2*pi*r
Скачать файл KRUG.exe
Паскаль:
Код:
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.
Последний раз редактировалось Godfather Bulan; 01.12.2008 в 23:22..
|
|
|

01.12.2008, 23:59
|
|
Участник форума
Регистрация: 15.05.2008
Сообщений: 166
Провел на форуме: 2591223
Репутация:
128
|
|
Приват?зачем на паскале константу обьявлять?просто пишешь pi .
|
|
|

02.12.2008, 00:11
|
|
Постоянный
Регистрация: 25.05.2008
Сообщений: 367
Провел на форуме: 2352294
Репутация:
416
|
|
Сообщение от Godfather Bulan
Площадь круга=pi*r^2
Длина окружности=2*pi*r
Скачать файл KRUG.exe
Паскаль:
Код:
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 
|
|
|

02.12.2008, 00:43
|
|
Постоянный
Регистрация: 18.03.2008
Сообщений: 411
Провел на форуме: 7469280
Репутация:
2389
|
|
Приват?зачем на паскале константу обьявлять?просто пишешь pi .
а хз почему. но не хочет так пахать....
смешно
|
|
|
|
 |
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|