IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Задачка, одномерные массивы
студентка
сообщение 22.11.2004 14:28
Сообщение #1


Гость






Срочно надо решить задания, а я ничего в массивах не знаю. blink.gif Помогите пожалуйста!!!!
1.)Даны действительные а1,....,a18. Получить а1,a10,a2,a11,...,a9,a18.
2.)Даны целые a1,...,an. Получить новую последовательность, выбросив из
исходной все члены с наибольшим значением (если все члены последовательности равны, то ничего выводить не нужно).
3.)Если в данной последовательности действительных чисел a1,....,an есть
хотя бы один член, меньше чем -2, то все отрецательные члены заменить
их квадратами, оставив остальные без изменений; в противном случае
домножить все члены на 0.1.
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов
студентка
сообщение 24.11.2004 19:08
Сообщение #2


Гость






volvo
СПАСИБО!!!
 К началу страницы 
+ Ответить 

Сообщений в этой теме
студентка   Задачка   22.11.2004 14:28
volvo   студентка Вот первая задача... Попробуйте решить о...   23.11.2004 13:46
студентка   volvo СПАСИБО!!!   24.11.2004 19:08
студентка   :rolleyes: Вторую задачку я решила, а вот с третье...   26.11.2004 15:36
volvo   студентка Значит так: самый простой вариант - два ...   26.11.2004 15:47
студентка   СПАСИБО-О-О!!!!   26.11.2004 16:02


 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия 19.07.2025 14:48
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"