Luokkahuone, jossa siistejä oppilaita. Taustalla näkyy virasto. Oppilaat pääsevät kokeilemaan ihan oikeita salkkuja.
Miksi?
Kuvia netistä:
program posneg;
uses crt;
var
no : integer;
begin
clrscr;
Write('Enger a number:');
readln(no);
if (no > 0) then
writeln('You enter Positive Number')
else
if (no < 0) then
writeln('You enter Negative number')
else
if (no = 0) then
writeln('You enter Zero');
readln;
end.
[näyttely: ohjelmointikielten kuvat]
Eyderai: Pascalin "if" ei tarvitse sulkeita ehtolausekkeen ympärille – ei ainakaan Turbo Pascal.