(toiminnot)

hwechtla-tl: Teos: Pascal

Kierre.png

Mikä on WikiWiki?
nettipäiväkirja
koko wiki (etsi)
viime muutokset


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.


kommentoi (viimeksi muutettu 19.03.2026 14:06)