9 lines
170 B
ObjectPascal
9 lines
170 B
ObjectPascal
program AgilaStudy;
|
|
{$mode objfpc}{$H+}{$assertions on}
|
|
|
|
var Score: Integer;
|
|
begin
|
|
Score := 85;
|
|
if Score >= 80 then writeln('Andam') else writeln('Pagpraktis');
|
|
end.
|