Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 28.05.2009, 14:17   #1
sunnysunny
Пользователь
 
Регистрация: 28.05.2009
Сообщений: 14
По умолчанию блок-схема....может кто-нить помочь?

не дружу с блок-схемами, помогите, плиз, составить
sunnysunny вне форума Ответить с цитированием
Старый 28.05.2009, 14:51   #2
RusArtm
Пользователь
 
Регистрация: 26.05.2009
Сообщений: 22
По умолчанию

А где зажача то вообще?
Что строить?
Блок схемы чего? Програмки, бизнесс-процесса, картины на стене?
Блок схемы в какой нотации?

Пишите вопросы полностью, не понятно же о чем речь просто совершенно..
RusArtm вне форума Ответить с цитированием
Старый 28.05.2009, 19:16   #3
sunnysunny
Пользователь
 
Регистрация: 28.05.2009
Сообщений: 14
По умолчанию

блок-схему программы
#include <stdio.h>
#include <conio.h>
#include <clx.h>
#include "math.h"
#pragma hdrstop
unsigned long factorial(unsigned long f);
//---------------------------------------------------------------------------

double a, m, N, p, r, t, T, Rs, Ts, r1, sum, Po;
int main(void)
{
int n, i;
while(1){
printf ("Vvedite chislo kanalov, no nebol'she 6: "); // okna kass
scanf ("%d", &n);
if(n == -1)
return 0;
if ( (n < 1) || (n > 6) )
{
printf ("Vy vveli nevernoe chislo!: try again\n");
}
else break;
}
printf("Vvedite intensivnost` vxodiaschego potoka: ");
scanf("%lf", &a);

printf("Vvedite srendee vremya obslyjivaniya odnoj zajavki(v minutah): ");
scanf("%lf", &t);
m=1/t;
printf("Intensivnost' potoka obsluzivanija (chel/min): %f\n", m);

p=a/m;
printf("Intesivnost` nagryzki: %f\n", p);

N=p;
printf ("Srednee chislo zanjatyx kassirov: %f\n", N); // chislo zanjatyx kanalov
sum=0;

for (i=1; i<=n; i++)
sum += pow(p, i) / factorial(i);

Po = 1.0/ (1 + sum + ( pow(p, n+1) / ( factorial(n)*(n-p) ) ));

printf ("Verojatnost' otsutstvija zajavok v sisteme=%5.4f\n", Po); // verojatnost', chto vse kassiry svobodny
r=pow(p, n+1) / (factorial(n-1)*(n-p)*(n-p))*Po;
printf ("Srednee chislo passagirov v ocheredi: %f\n", r);
Rs=N+r;
printf ("Srednee chislo passagirov u kass: %f\n", Rs); // srednee chislo zajavok v sisteme
T=r/a;
printf ("Srednee vremja, kotoroe passagir provodit v ocheredi: %f\n", T);
Ts=Rs/a;
printf ("Srednee vremja, kotoroe passagir tratit na priobretenie zhetona: %f\n", Ts); // srednee vremja zajavki v sisteme*/
getch();
return 0;
}

unsigned long factorial(unsigned long f)
{
if (f) return(f * factorial(f - 1));
return 1;
}
sunnysunny вне форума Ответить с цитированием
Старый 28.05.2009, 23:57   #4
sunnysunny
Пользователь
 
Регистрация: 28.05.2009
Сообщений: 14
По умолчанию

ну пжлста...((((помогите
sunnysunny вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
кто может помочь с задачками по Паскалю? Defa4ka Помощь студентам 22 10.05.2009 22:19
Кто мне может помочь установить афльфаскины Lemo Компоненты Delphi 8 23.03.2009 00:56
Помогите создать БД в Делфе. Может кто-нить сталкивался с таким? Politex Фриланс 13 26.01.2009 14:26
Помогите создать БД в Делфе. Может кто-нить сталкивался с таким? Politex Помощь студентам 3 19.01.2009 20:28