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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 22.04.2012, 10:04   #1
Кристюша
 
Регистрация: 22.04.2012
Сообщений: 5
По умолчанию паскаль

В одномерном массиве, состоящем из n вещественных элементов, вычислить:
1. номер минимального элемента массива;
2. сумму элементов массива, расположенных между первым и
вторым отрицательными элементами.

Последний раз редактировалось Кристюша; 22.04.2012 в 10:26.
Кристюша вне форума Ответить с цитированием
Старый 22.04.2012, 10:52   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Ну а в чем сложность?
Что в методичках пишут?
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 22.04.2012, 10:52   #3
TinMan
Форумчанин
 
Аватар для TinMan
 
Регистрация: 05.09.2011
Сообщений: 869
По умолчанию

Кристюша, а искать не пыталась? Таких задач были не сотни, а тысячи.
Особенно в разделе Паскаль..
Предпочитаю на "ты".
TinMan вне форума Ответить с цитированием
Старый 22.04.2012, 11:12   #4
Кристюша
 
Регистрация: 22.04.2012
Сообщений: 5
По умолчанию

а ты сможешь мне код скинуть..=)))

Последний раз редактировалось Кристюша; 22.04.2012 в 11:26.
Кристюша вне форума Ответить с цитированием
Старый 22.04.2012, 11:50   #5
Кристюша
 
Регистрация: 22.04.2012
Сообщений: 5
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
Ну а в чем сложность?
Что в методичках пишут?
вот моя прога но она не работает
задание 2

Код:
procedure massiv;
var s,b,i:integer;
begin
s:=0;
for i:=1 to 10 do begin
 if (a[i]<0) then b:=not b;
 if b then s:=s+s[i] else
  if s<>0 then break
end;
label3.Caption:=inttostr(s);

Последний раз редактировалось ACE Valery; 22.04.2012 в 19:18.
Кристюша вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Паскаль, Борланд Паскаль-в чем разница??? Vremya-Dengy Паскаль, Turbo Pascal, PascalABC.NET 13 31.05.2011 18:23
паскаль и турбо паскаль Евгения Игоревна Помощь студентам 6 05.05.2011 14:31
Паскаль Анастасия18 Помощь студентам 1 21.02.2011 23:11
Паскаль Alfis Паскаль, Turbo Pascal, PascalABC.NET 2 07.12.2008 15:28