Технический форум
Вернуться   Технический форум > Программирование > Форум программистов > Помощь студентам


Ответ
 
Опции темы Опции просмотра
Старый 11.11.2010, 02:56   #1 (permalink)
hamer
Новичок
 
Регистрация: 31.10.2010
Сообщений: 5
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
По умолчанию Разработать библиотечный модуль

Составить программу, вызывающую процедуры и функции созданного модуля из следующей программы:


Код:
program laba5;
uses crt;
var a:array[1..100] of real;
  n,i:byte;
  p:real;
begin
write('n=');
readln(n);
p:=1;
for i:=1 to n do
  begin
  readln(a[i]);
  if i mod 2=0 then p:=p*a[i];
   end;
write('P=',p:0:2);
readln;
end.
hamer вне форума   Ответить с цитированием

Старый 11.11.2010, 02:56
Helpmaster
Member
 
Аватар для Helpmaster
 
Регистрация: 08.03.2016
Сообщений: 0

По запросам найдены топики, которые по содержанию схожи с вашим

Разработать алгоритм и составить программу для решения задачи
Разработать функцию для определения количества нулей в одномерном массиве
Разработать ПО по управлению БД и ПО, производящее построение однотипных графиков

Старый 11.11.2010, 07:15   #2 (permalink)
AlexZir
support
 
Аватар для AlexZir
 
Регистрация: 19.08.2007
Адрес: Зея
Сообщений: 14,941
Записей в дневнике: 57
Сказал(а) спасибо: 135
Поблагодарили 164 раз(а) в 69 сообщениях
Репутация: 67284
По умолчанию

Во-первых, тема перемещена в соответствующий раздел.

Во-вторых, приведенный листинг содержит простейший алгоритм подсчета произведения значений чётных элементов массива.

В-третьих, совершенно непонятно, какие именно процедуры и функции должен содержать модуль. В приведенном вами листинге их нет и в помине и, imho, нет никакого смысла в усложнении прилично работающего кода за счет подключения внешнего модуля.

Если есть такая возможность, разместите полный текст задания.
__________________
Убить всех человеков!
AlexZir вне форума   Ответить с цитированием
Ads

Яндекс

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

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Выкл.
HTML код Выкл.
Trackbacks are Вкл.
Pingbacks are Вкл.
Refbacks are Выкл.




Часовой пояс GMT +4, время: 06:04.

Powered by vBulletin® Version 6.2.5.
Copyright ©2000 - 2014, Jelsoft Enterprises Ltd.