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

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

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 08.06.2015, 17:12   #1
Spartak213
Новичок
Джуниор
 
Регистрация: 08.06.2015
Сообщений: 1
По умолчанию Помогите с заданием!

Нужно сделать до четверга,а у самого ничего не получается.В Паскале АБЦ
Изображения
Тип файла: jpg Безымянный.jpg (55.2 Кб, 94 просмотров)
Spartak213 вне форума Ответить с цитированием
Старый 08.06.2015, 17:29   #2
type_Oleg
Старожил
 
Аватар для type_Oleg
 
Регистрация: 02.03.2008
Сообщений: 2,504
По умолчанию

Стыдно должно быть, молодой человек, что не можете посчитать среднее арифметическое ( вы не поверите, но это именно среднее арифметическое, хотя иногда его называют математическим ожиданием, и чаще всего это не имеет значения )
Если стыдно, но бросайте этот институт и поступайте в другой институт , где вообще нет ни математики, ни программирования.
Если не стыдно, идите в раздел Фриланс, там вам за деньги напишут, все что угодно.

Саму подпрограмму могу написать, чтобы просто поняли , о чем речь
Код:
type Tarray=array of Double;
function SrAr(ar:Tarray):Double;
var s:Double;
     i:Integer;
begin
 s:=0;
 for i:=0 to Length(ar)-1 do s:=s+ar[i];
 SrAr:=s/Length(ar);
end;
type_Oleg на форуме Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
помогите с заданием AdelinaMango Общие вопросы C/C++ 0 10.04.2014 15:07
помогите с заданием klepan Общие вопросы C/C++ 2 26.06.2009 12:32
Помогите с заданием vvqwert Microsoft Office Excel 1 09.01.2009 16:19
помогите с заданием slim5 Помощь студентам 1 18.06.2008 08:50