Обьясните

Модераторы: Duncon, Naeel Maqsudov, Игорь Акопян, Хыиуду

Ответить
PoTaP
Сообщения: 2
Зарегистрирован: 03 июн 2007, 23:31

доброго времени суток.
обьясните процедуры и функции в паскале, желательно на простеньких примерах.
ну не понимаю я их, а в особенности как и что прописыватьв них самих
Лелик_1044
Сообщения: 340
Зарегистрирован: 22 ноя 2004, 19:15
Откуда: Минск
Контактная информация:

function Sum(x,y:integer):integer;
begin
result:=x+y;
// тут пардон не помню точно или result или return
end;

в любом месте программы вызыыаешь функцию
типо

Otvet:=Sum(5,3);

В результате чего Otvet будет равняться 8;

А вообще книги есть это ж азы программирования.
Просто набрать исходники может и любая обезьяна, а придумать и отладить не каждый человек.
BBB
Сообщения: 1298
Зарегистрирован: 27 дек 2005, 13:37

Лелик писал(а):function Sum(x,y:integer):integer;
begin
result:=x+y;
// тут пардон не помню точно или result или return
end;
result - это дельфийная штучка. В ПАскале результат надо присваивать "псевдо-переменной" с именем самой функции:

Код: Выделить всё

function Sum(x,y:integer):integer;
begin
 Sum:=x+y;
end;
Лелик_1044
Сообщения: 340
Зарегистрирован: 22 ноя 2004, 19:15
Откуда: Минск
Контактная информация:

давно на паскале не работал может быть и так
спорить не буду
Просто набрать исходники может и любая обезьяна, а придумать и отладить не каждый человек.
Аватара пользователя
Колядин Максим
Сообщения: 297
Зарегистрирован: 16 ноя 2006, 19:09
Откуда: Seattle, WA
Контактная информация:

PoTaP писал(а):обьясните процедуры и функции в паскале, желательно на простеньких примерах.
В общем, процедура и функция - вещи почти одинаковые, только у функции есть результатирующее значение. Вот простенькие примеры использования.
1)Без функций:

Код: Выделить всё

var a,b: integer]
2)[I]C функцией:[/I]
[code]
var a,b: integer;

{после объявления переменных объявим функцию}

function sum(var x,y: integer)[b]:integer;[/B] 
{выделенный жирным шрифтом код означает,}
{что результат будет типом integer (целым числом)} 
sum:=x+y;
end;

{начало программы}

begin
write('Введите 2 числа: '); 
readln(a,b);
writeln('Cумма этих чисел = ',sum(a,b)); {здесь мы использовали функцию}
end.
Программист - это человек, который решает способом, который вы не понимаете, проблемы, о которых вы даже не подозревали...
PoTaP
Сообщения: 2
Зарегистрирован: 03 июн 2007, 23:31

всем спасибо вроде начал понимать
Ответить