14.3.. Prebrojati dvocifrene brojeve kod kojih je druga cifra djeljiva sa 4
Listing programa:
PROGRAM p14314027;
USES
WinCrt;
VAR
i,c,br: integer;
begin
for i:=10 to 99 do
begin
c:=i mod 10;
if c mod 4=0 then
br:=br+1;
end;
writeln('ukupno ima ',br:2,' brojeva');
end.
Ispis na ekranu:
![](143_izvedi/14314027.gif)
Index
|
![](../epp/000/Asistent.jpg) |