Contents   Index

Beispiele

• Schriftliche Durchschnittsnote:
  • Begrüße und erfrage die Noten der vier Schulaufgaben
  • Notiere die vier Noten
  • Berechne den Durchschnittwert
  • Gib den Schnitt (mit kurzem Text) bekannt.
  In Turbo Pascal formuliert:

    program Note;
    uses crt;
    VAR sa1,sa2,sa3,sa4:integer;
        schnitt:real;
    begin
      writeln('Hallo');
      readln(sa1);
      readln(sa2);
      readln(sa3);
      readln(sa4);
      schnitt:=(sa1+sa2+sa3+sa4)/4;
      writeln('Schnitt: ');
      weite(schnitt:1:2);
      repeat until keypressed;
    end.
  

  Contents   Index