14.6. Ispisati sve dvocifrene brojeve sa većom prvom cifrom. (koristi dvije petlje i jedna IF naredba, i>j).
Opis rješenja: Logičkog izraza je sličan prethodnim: i>j.
Listing programa:
PROGRAM dvoc14_6;
USES
WinCrt;
VAR
i, j: INTEGER;
BEGIN
FOR i := 1 TO 9 DO
FOR j := 0 TO 9 DO
IF i>j THEN
WRITELN('i= ', i , ' j= ', j, ' dvocifreni broj ', i,j);
END.
Daljnji rad: Napisati programa za ispis dvocifrenih brojeva ćija je prva cifra manja od druge cifre.
Index
|