Показать сообщение отдельно
Старый 30.05.2009, 08:33   #53 (permalink)
Vladimir_S
Специалист
 
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 27,807
Сказал(а) спасибо: 340
Поблагодарили 583 раз(а) в 208 сообщениях
Репутация: 113184
По умолчанию

Цитата:
Сообщение от Kosmos Посмотреть сообщение
Vladimir_S, не могли бы Вы помочь еще с заданиями 4, 5, 6, 7 из поста #29.

И в задании: В одномерном массиве, состоящем из п вещественных элементов, вычислить:
1.Номер минимального элемента массива.
2.Преобразовать массив таким образом, чтобы сначала располагались все элементы, модуль которых не превышает единицу, а потом — все остальные.

(Ваш пост №30), паскаль также не хочет компилировать, ругается на выражение:
"IF ABS(B[i])>1 THEN"
Если в Вашем Паскале почему-то нет функции Abs(x) - абсолютная величина - то ее можно обойти. Например так: замените строку
IF ABS(B[i])>1 THEN
строкой
IF SQRT(SQR(B[i]))>1 THEN
или даже еще проще
IF SQR(B[i])>1 THEN
поскольку если абсолютная величина числа <>1, то и его квадрат тоже <>1.

Что касается остальных заданий - давайте-ка сами. Я могу помочь с составлением программы, с нахождением алгоритма, но учить за Вас записи, процедуры и функции считаю бессмысленным, ибо я это всё и так знаю.
Vladimir_S вне форума  
Ads

Яндекс

Member
 
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070