ALG24
var c:integer;
begin
c:=a+b; writeln(c)> m: =c1a1b end;
int c;
C=a+b;
cout « c << endl; m=C1a1b;
int i,j,k; void main()
i” 10; j=20;
procl(i,j,k);
• C++ nie umożliwia tworzenia procedur i funkcji lokalnych;
• zdefiniowane funkcje i procedury są ogólnie dostępne w całym programie;
• odpowiednikiem deklaracji typu var w nagłówku funkcji, jest w C++ zasadniczo tzw. referencja (&), np. Funfyar i.integer;...) jest równoważne funkcjonalnie formie Funfinidi i,
Funkcje
Zasadnicze różnice pomiędzy funkcjami w C++ i w Pascalu dotyczą sposobu zwracania wartości:
program prlO; function
pLusż(a:integer):integer, begin
plus2:=a+2 ond;
var i: integer; begin
i:=10;
writeln(plus2 (i)) end.
i=10;
couic<plus2(i)<<endl;
1
nie jest możliwe przekazanie przez referencję tablicy. W C++ tablice są z założenia przekazywane przez adres. Przykładowo, zapis Funfint tab[3]) oznacza chęć użycia jako parametru wejściowego tablicy elementów typu int. Podczas wywołania funkcji Fun, tablica lab jest przekazywana poprzez swój adres i jej zawartość może być fizycznie zmodyfikowana.
Wyszukiwarka
Podobne podstrony:
obraz0 (62) Złożoność obliczeniowa - przykład procedurę zagadka(n integer); var i. k. 1: integer; b81670 zdj5 (5) Przykład programu w języku maszynowym Program obliczający y var x, y: integer; beginDSC00444 program Pole_Trapezu; uses crt; var a,b,h:integer; P:real; begin clrscr; writeln( Program57 (278) var Liczba, I : Integer; begin Liczba 0; for I :-1 to 1000 do if not Odd (T[I]> the70225 zdj0 Obliczanie wzorów - program fuiu tion vzor(F(n. n)): integer begin var: i. j integer: fograf1 program Grafika; uses CRT, Graph; var driver,mode: integer; begin driver := DETECT; (wykrALG22 322 Dodatek A ond; var x:cell; begin x.c:= a ; x.a:=1 end. celi x; void main() f x. c*Drzewa BST procedurę Wyważ (var p : wsk; b : integer); var a : integer; q, w : wsk; begin b:=b-l; aimg171 171 12.1. Parsing ekspansywnych języków grafowych procedurę ExpRec (var rec); begin for i :=img073 73 6.3. Wybór liniowej funkcji przynależności procedurę linrec (obj, var rec); begin for i :=img171 171 12.1. Parsing ekspansywnych języków grafowych procedurę ExpRec (var rec); begin for i :=15971 programstr4 Program procedurę Oblicz; begin writelnfMoc N = f,N:5:2/ [kW]’); writcln( Energiaprogram Zasięgi; var i,j: integer; x: real; procedurę Pierwsza var k: integer; procedurę Drugawięcej podobnych podstron