Презентація на тему «Процедури з параметрами»
239
Слайд #1
Процедури з параметрами(опис та виклик)
Слайд #2
Procedure ABC
(формальні параметри) ;
Var
локальні змінні ;
текст процедури
var
глобальні змінні;
текст головної програми
ABC
(фактичні параметри) ;
end.
end;
Головна програма
- виклик процедури
Опис процедури
(формальні параметри) ;
Var
локальні змінні ;
текст процедури
var
глобальні змінні;
текст головної програми
ABC
(фактичні параметри) ;
end.
end;
Головна програма
- виклик процедури
Опис процедури
Слайд #3
Формальні та фактичні параметри мають бути узгоджені по:
- кількості;
- типу;
- порядку запису .
- кількості;
- типу;
- порядку запису .
Слайд #4
Аргументи та результати
Слайд #5
Procedure ABC
(аргументи;
Var
локальні змінні ;
текст процедури
var
глобальні змінні;
текст головної програми
ABC
(аргументи, результати) ;
end.
end;
Головна програма
Var
результати) ;
(аргументи;
Var
локальні змінні ;
текст процедури
var
глобальні змінні;
текст головної програми
ABC
(аргументи, результати) ;
end.
end;
Головна програма
Var
результати) ;
Слайд #6
При виклику процедури :
— на місці фактичних параметрів – аргументів можуть стояти сталі, змінні та вирази;
— на місці фактичних параметрів – результатів можуть стояти тільки змінні.
аргументи
результати
S1, S2 ) ;
2, а, с+5,
ABC (
— на місці фактичних параметрів – аргументів можуть стояти сталі, змінні та вирази;
— на місці фактичних параметрів – результатів можуть стояти тільки змінні.
аргументи
результати
S1, S2 ) ;
2, а, с+5,
ABC (
Слайд #7
Задача .
Знайти суми цілих чисел на інтервалах a,b тa c,d.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
|_______| |____________|
a S1 b c S2 d
Знайти суми цілих чисел на інтервалах a,b тa c,d.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
|_______| |____________|
a S1 b c S2 d
Слайд #8
Procedure ABC (x , y : real ; var S : real) ;
Var n : real ; { - три форм. параметра}
begin for n :=x to y do S := S+ n ;
End ;
Var a ,b ,c , d ,S1 ,S2 : real ;
Begin
Readln (a,b,c,d) ;
ABC ( a, b, S1) ; {- три фактичних параметра}
ABC (c, d, S2) ;
Writeln (S1 , S2)
Еnd.
назад
Var n : real ; { - три форм. параметра}
begin for n :=x to y do S := S+ n ;
End ;
Var a ,b ,c , d ,S1 ,S2 : real ;
Begin
Readln (a,b,c,d) ;
ABC ( a, b, S1) ; {- три фактичних параметра}
ABC (c, d, S2) ;
Writeln (S1 , S2)
Еnd.
назад
