11 lines
1.6 KiB
HTML
11 lines
1.6 KiB
HTML
<!doctype html><html lang="tl"><meta charset="utf-8"><title>Function at malinaw na patakaran</title><h1>Function at malinaw na patakaran</h1><p>15-minutong sesyon: magbasa nang 3 minuto, mag-trace nang 3, mag-eksperimento nang 7, at sagutan ang check nang 2. Maglaan ng dagdag na oras kung kailangan.</p><p>Pinapangalanan ng function o subroutine ang calculation na magagamit muli. Tumatanggap ang patakaran ng nonnegative total at completed; zero ang sagot kapag umabot o lumampas ang completed sa total. Kung hindi, ibinabalik ang diperensiya. Sundan ang (4,1), (4,4), (4,5), at (0,0). Ihiwalay ang pagpi-print sa calculation. Ipaliwanag kung bakit wala sa saklaw ang negative input at magdisenyo ng pagtanggi bago tumanggap ng external input.</p><p>Magkaiba ang Object Pascal classes at Objective-Pascal. Unahin ang <code>class</code>, construction, at <code>Free</code> sa Linux lab. Nagdaragdag ng Objective-C interoperability ang Objective-Pascal sa pamamagitan ng mode switches; wala sa lab ang Apple runtime na iyon.</p><pre><code class="language-objectpascal">program AgilaStudy;
|
|
{$mode objfpc}{$H+}{$assertions on}
|
|
function Remaining(Total, Done: Integer): Integer;
|
|
begin
|
|
if Done >= Total then Result := 0 else Result := Total - Done;
|
|
end;
|
|
|
|
begin
|
|
writeln(Remaining(4, 1));
|
|
end.
|
|
</code></pre><p><strong>Inaasahang resulta:</strong> <code>3</code></p><h3>Pagsasanay at ebidensiya</h3><p>Itala ang hula, aktuwal na resulta, at dahilan ng pagtugma o pagkakaiba. Sinusukat ng completion check ang pag-unawa; hinahasa ng practice task ang kasanayan.</p><p><a href="https://docs.freepascal.org/daily/doc/ref/refse74.html">Sanggunian sa wika</a></p></html> |