Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
jestero
11 / 11 / 2
Регистрация: 17.02.2014
Сообщений: 946
#1

Описание процедуры - Turbo Pascal

31.01.2016, 20:48. Просмотров 164. Ответов 1
Метки нет (Все метки)

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
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
const
    n = 10;
 
type
    miniarr = array[1..n] of integer;
 
var
    a, b: miniarr;
 
procedure arr_rand (k:integer; var arr: miniarr);
    var i: byte;
    begin
        writeln ('Заполнение массива случайными числами.');
        randomize;
        for i := 1 to k do
            arr[i] := random (100);
    end;
 
procedure arr_user (k:integer; var arr: miniarr);
    var i: byte;
    begin
        write ('Введите  ', k, ' чисел через пробел: ');
        for i := 1 to k do
            read (arr[i]);
    end;
 
procedure arr_out (k:integer; var arr: miniarr);
    var i: byte;
    begin
        write ('Вывод массива: ');
        for i := 1 to k do
            write (arr[i]:4);
        writeln;
    end;
 
begin
 
    arr_rand (n, a);
    arr_out (n, a);
    writeln;
    arr_user (n, b);
    arr_out (n, b);
 
readln
end.
Pascal
1
2
 
procedure arr_rand (k:integer; var arr: miniarr);
Почему например в этой строчке когда описываются параметры процедуры, то написано var arr: miniarr, а не просто
arr: miniarr. Для чего нужен в данном случае var?
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
31.01.2016, 20:48
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Описание процедуры (Turbo Pascal):

Дано описание процедуры
procedure A(a:real; var b:real); begin if a<0 then b:=-a else b:=a end;...

Используя описание процедуры вычислить выражение
привет! Решите пожалуйста кто может !!! Используя описание процедуры...

Процедуры без параметров (описание, пример)
Доброго времени суток. У меня есть просьба. Объясните пожалуйста, что такое...

Использование имени процедуры в качестве параметра другой процедуры
Предложите, пожалуйста, пример решения след. задачи с использованием...

Использование имени процедуры в качестве параметра другой процедуры
Help! Для массива С из n элементов составить процедуру, которая находит...

1
Puporev
Модератор
54127 / 41760 / 28872
Регистрация: 18.05.2008
Сообщений: 98,282
31.01.2016, 22:07 #2
Потому что массив создается и передается (var) в программу.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
31.01.2016, 22:07
Привет! Вот еще темы с решениями:

описание процедуры SortIndex
Описать процедуру SortIndex(A,N,I), формирующую для вещественного массива А...

Сформировать отдельный модуль, содержащий описание процедуры Double,
Сформировать отдельный модуль, содержащий описание процедуры Double,...

Процедуры и функции: решить через процедуры S=a*x+b*y+c*z.
Пожалуста помогите решить через процедуры S=a*x+b*y+c*z.

Процедуры и функции. Процедуры с числовыми параметрами
Описать процедуру RectPS (x1, y1, x2, y2, P, S), вычисляющую периметр P и...


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

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

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