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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 12.12.2011, 17:54   #1
Artijam
Новичок
Джуниор
 
Регистрация: 12.12.2011
Сообщений: 4
Вопрос Задача на Паскале

Помогите с программой. "Задайте массив из 10 элементов с помощью датчика случайных чисел. Найдите среднее арифметическое четных элементов массива. Выведите на экран исходный массив и полученное среднее арифметическое."

var a:array [1..10] of integer;
i:integer;
begin
for i:=1 to 10 do

Начал я вот так. Не знаю, правильно или нет. Помогите дописать.
Artijam вне форума Ответить с цитированием
Старый 12.12.2011, 19:11   #2
Mandrivnyk
Software Developer
Участник клуба
 
Аватар для Mandrivnyk
 
Регистрация: 01.03.2011
Сообщений: 1,098
По умолчанию

Ну, ты на правильном пути.
Шагай дальше, поможем.
Болтовня ничего не стоит. Покажите мне код. (c) Linus Torvalds
Помог ответ? -- Поставьте отзыв.
Выражения особой благодарности в рублевом эквиваленте отправлять сюда --> R269634919062
Mandrivnyk вне форума Ответить с цитированием
Старый 12.12.2011, 19:32   #3
Artijam
Новичок
Джуниор
 
Регистрация: 12.12.2011
Сообщений: 4
По умолчанию

Ну а вот со случайными числами я не знаю как(
Artijam вне форума Ответить с цитированием
Старый 12.12.2011, 19:43   #4
Mandrivnyk
Software Developer
Участник клуба
 
Аватар для Mandrivnyk
 
Регистрация: 01.03.2011
Сообщений: 1,098
По умолчанию

Процедура randomize() -- инициализирует генератор случайных чисел (вызывается один раз, в начале программы);
функция random(N) -- возвращает целое случайное число от 0 до N-1.
Твой ход -)
Болтовня ничего не стоит. Покажите мне код. (c) Linus Torvalds
Помог ответ? -- Поставьте отзыв.
Выражения особой благодарности в рублевом эквиваленте отправлять сюда --> R269634919062
Mandrivnyk вне форума Ответить с цитированием
Старый 12.12.2011, 19:55   #5
Artijam
Новичок
Джуниор
 
Регистрация: 12.12.2011
Сообщений: 4
По умолчанию

Эх, не силен я в программировании. На первом курсе только. И не изучал почти)). Могу заплатить за написание программы. Только на WM у меня немного денег осталось. 35 рублей могу скинуть))
Artijam вне форума Ответить с цитированием
Старый 12.12.2011, 20:10   #6
Mandrivnyk
Software Developer
Участник клуба
 
Аватар для Mandrivnyk
 
Регистрация: 01.03.2011
Сообщений: 1,098
По умолчанию

В аську стукни...
Болтовня ничего не стоит. Покажите мне код. (c) Linus Torvalds
Помог ответ? -- Поставьте отзыв.
Выражения особой благодарности в рублевом эквиваленте отправлять сюда --> R269634919062
Mandrivnyk вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
задача в Паскале Саня просто саня Фриланс 5 12.05.2011 02:25
Задача на Паскале KingCross Помощь студентам 2 19.02.2011 21:59
Задача на паскале silverangel Паскаль, Turbo Pascal, PascalABC.NET 4 02.12.2010 20:34
Задача на Паскале Вика М. Помощь студентам 4 02.12.2010 17:37
задача на Паскале Вера123 Помощь студентам 3 10.06.2009 22:05