Оформление процедуры с массивами

_Игорек_ · 19.07.2011, 19:24

Подскажите, как будет оформить процедуру с одномерным массивом. Например:
A[1]+A[2]+A[3]

для Pascal 7.0*

Vladimir_S · 19.07.2011, 21:04

Цитата:

Сообщение от _Игорек_

Подскажите, как будет оформить процедуру с одномерным массивом. Например:
A[1]+A[2]+A[3]

для Pascal 7.0*

Прежде всего - не лезть в чужие темы, а создавать свои. Сейчас я это сделал за Вас.
А оформить - например, так:

Код:

TYPE
 AR=Array[1..3] of Integer;
VAR
 A:AR;
 S:Integer;

Procedure Sum(As:AR; var Ss:Integer);
Var i:Integer;
Begin
 Ss:=0;
 For i:=1 to 3 do Ss:=Ss+As[i];
End;

BEGIN
 A[1]:=3;
 A[2]:=5;
 A[3]:=7;
 Sum(A,S);
 Writeln('Sum= ',S);
 Readln;
END.

_Игорек_ · 19.07.2011, 21:10

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

Vladimir_S · 19.07.2011, 21:49

Цитата:

Сообщение от _Игорек_

Владимир, можно ли узнать ваш скайп

Не-а... за неимением такового. Я по возрасту соответствую своей аватарке, а потому ни скайпов, ни твиттеров, ни даже Асек... Так что лучше всего выкладывайте проблемы на форум - и другим полезно, да и коллеги поддержат: я ведь тоже далеко не всё в Паскале знаю.

Mr.П 2.0 · 20.07.2011, 13:12

_Игорек_ моя аська:624917451 обращайся.
И тебе точно нужна сумма 3 элементов массива или до N

19.07.2011, 19:24	#1 (permalink)
_Игорек_ Новичок Регистрация: 19.07.2011 Сообщений: 2 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Подскажите, как будет оформить процедуру с одномерным массивом. Например: A[1]+A[2]+A[3] для Pascal 7.0*

19.07.2011, 19:24
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	Пока люди думают, что вам ответить вы можете ознакомиться с подобными темами Оформление корпуса колонки Задача с массивами Помогите с массивами Работа с массивами на С++ или PERL. Помогите с массивами в TP

19.07.2011, 21:10	#3 (permalink)
_Игорек_ Новичок Регистрация: 19.07.2011 Сообщений: 2 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Спасибо большое за ответ, извините за нарушение правил. Владимир, можно ли узнать ваш скайп для дальнейшего обсуждения некоторых возникающих проблем. Часто пользуюсь паскалем и иногда сталкиваюсь с некоторыми элементарными проблемами, которые не в состоянии решить самостоятельно. Еще раз спасибо.

20.07.2011, 13:12	#5 (permalink)
Mr.П 2.0 Member Регистрация: 16.03.2011 Сообщений: 29 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 11	_Игорек_ моя аська:624917451 обращайся. И тебе точно нужна сумма 3 элементов массива или до N

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