labas
seniai bendravau su paskaliu. noriu proceduroj kreipini i funkcija naudot.
keikiasi.
argi negalima taip rasyt " writeln(SUMA(a,b)); " ?
klaida ant to sakinio meta. kaip reikia rasyt?
S.
program Bevard?8;
var a,b :integer;
procedure SKAIC ();
var a,b,c : integer;
begin
readln(a,b);
c:=a+b;
writeln(SUMA(a,b));
end;
function SUMA(a,b:integer):integer;
var c:integer;
begin
c:=a+b;
SUMA := c;
end;
begin
SKAIC();
readln;
end.