8.2.. Napisati program za ispis dvostruke vrijednosti prvih 5 prirodnih brojeva.
Listing programa:
PROGRAM P08211053;
USES
WinCrt;
VAR
I: INTEGER;
BEGIN
WRITELN('Ispis dvostruke vrijednosti 1 - 5 prirodnih brojeva');
i := 1;
WHILE i <= 5 DO
BEGIN
WRITELN ('i = ', i, ' 2 * ', i , ' = ', 2 * i);
i := i + 1;
END;
END.
Ispis na ekranu:
Index
|
|