function sum (b, c:integer): integer; begin sum:=b+c end; begin Edit1.Text:=IntToStr(sum(20, 5)); end. Экранға не шығады?
1
25
2
sum:=b+c
3
20
4
5
5
sum (20, 5)