Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/6: Рейтинг темы: голосов - 6, средняя оценка - 4.50
0 / 0 / 0
Регистрация: 15.12.2013
Сообщений: 4
1

Описать функцию, вычисляющую произведение чисел целочисленного массива A(N) . Ввод элементов массива оформить в виде процедуры

15.12.2013, 18:07. Просмотров 1120. Ответов 1
Метки нет (Все метки)

Описать функцию, вычисляющую произведение чисел целочисленного массива A(N) . Ввод элементов массива оформить в виде процедуры. Пожалуйста помогите мне на завтра на (зачет) надо. С меня магарич
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
15.12.2013, 18:07
Ответы с готовыми решениями:

Оформить в виде процедуры сортировку массива
Помогите закончить с массивом! мне помогли с программой, но надо ее завершить. В паскале мало...

Ввод N элементов массива в виде процедуры
программа ввода N элементов массива в виде процедуры

Оформить программу с помощью процедуры ввода массива и процедуры вывода массива на экран.
Program Primer1; uses crt; var a: array of integer; i: integer; Begin clrscr; for i:=1 to...

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

1
350 / 343 / 279
Регистрация: 21.05.2013
Сообщений: 1,312
15.12.2013, 18:41 2
Лучший ответ Сообщение было отмечено Mozilla как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
program Mozilla;
{$APPTYPE CONSOLE}
uses SysUtils;
type
    arr =array [1..10] of integer;
var mas:arr;
n:Integer;
procedure in_array(var a:arr;n:Integer);
var i:Integer;
begin
  Writeln('Array in data');
  for i:=1 to n do
    begin
     Write('Array [',i,'] = ');Readln(a[i]);
    end;
  Write('Array out data = ');
  for i:=1 to n do
    begin
       Write(a[i],' ');
    end;
Writeln;
end;
 
begin
Write('Enter size of array = ');Readln(n);
  in_array(mas,n);
  Readln;
end.
Error => delete 1-3 string
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
15.12.2013, 18:41

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

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

Описать функцию average(ar, n), вычисляющую среднее арифметическое первых n элементов массива
Дано описание: Type artype=array of real; Описать функцию average(ar,n), вычисляющую среднее...

Описать функцию max(x, n), вычисляющую максимальный элемент среди первых n элементов массива
Дано описание: Type artype=array of real;Описать функцию max(x,n), вычисляющую максимальный...

Процедуры и функции. Описать функцию SumCol(A,M,N,k), вычисляющую сумму элементов столбца матрицы
Описать функцию SumCol(A,M,N,k) вещественного типа, вычисляющую сумму элементов вещественной...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.