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

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

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

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 26.02.2008, 10:52   #1
miron
 
Регистрация: 19.02.2008
Сообщений: 9
По умолчанию Нужна помощь(Разработать алгоритм, нарисовать его блок-схему.)

Помогите пожалуйся. Разработать алгоритм, нарисовать его блок-схему.
Даны целые числа а, n, x1 , …, xn (n > 0). Определить, каким по счету идет в последовательности x1 , …, xn член, равный а. Если такого члена нет, то ответом должно быть число 0.
miron вне форума Ответить с цитированием
Старый 26.02.2008, 11:03   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Ну выкладывай свои идеи (ато тема во Фриланс пойдет)
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 26.02.2008, 11:55   #3
-=<[Evklidd]>=-
Форумчанин Подтвердите свой е-майл
 
Аватар для -=<[Evklidd]>=-
 
Регистрация: 22.01.2008
Сообщений: 161
По умолчанию

program pos;
var
a, n, i,c: integer;
ar: array [1..3000] of integer;
begin
write('a= ');
readln(a);
write('n= ');
readln(n);
for i:= 1 to n do
begin
write(i,'element: ');
readln(ar[i]);
end;
c:= 0;
for i:= 1 to n do
begin
if a = ar[i] then
begin
write(i,' ');
inc(c);
end;
end;
if c = 0 then
write('0');
readln;
end.
-=<[Evklidd]>=- вне форума Ответить с цитированием
Старый 26.02.2008, 12:00   #4
miron
 
Регистрация: 19.02.2008
Сообщений: 9
По умолчанию

Идеи поко нету, нужно подсказка (помощь)
miron вне форума Ответить с цитированием
Старый 26.02.2008, 12:08   #5
miron
 
Регистрация: 19.02.2008
Сообщений: 9
По умолчанию

Спасибо -=<[Evklidd]>=- попробую нарисовать
miron вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[срочно] нарисовать блок схему masima Фриланс 3 29.05.2008 13:34
Помогите нарисовать блок схему ио к такой задаче gigaman Паскаль, Turbo Pascal, PascalABC.NET 2 10.03.2008 15:12
Нарисовать блок схему к задаче Паскаль gigaman Помощь студентам 3 07.03.2008 19:50
Помогите нарисовать блок-схему на ооочень маленький кусочек программы!!!!! metamfetamin Помощь студентам 1 24.11.2007 22:55