Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Artiklar / Titel på artikeln

Introduktion till Pascal - Del 03: Selektion

Postad 2006-04-25 av Christoffer Lejdborg i sektionen ASP.NET, C#, Okategoriserat med 0 Kommentarer | Läst av: 4355, Betyg: 0%

Förord

Den här artikeln kommer att handla om selektion, valsituationer. I verkliga livet gör du val hela tiden, och gissa vad, i programmering gäller samma sak ;) Vi kommer i den här delen av min artikelserie gå igenom if och else och deras användning i Pascal.
Innehåll
  » Valsituationer
  » If-satser
  » Else
  » Jämförelseoperatorer
  » Nästlade if-satser
  » Else If
  » Övningar
  » Avslutning
Relaterade artiklar
  » Introduktion till Pascal - Del 04: Sammansatta villkor
  » Introduktion till Pascal - Del 02: Variabler 1/2


Valsituationer

Som sagt så utsätts man dagligen för en mängd olika val. I olika situationer måste man anpassa sig på olika sätt. Till exempel kanske du vill cykla till skolan/jobbet om vädret är bra, men om det regnar vill du ta bilen eller bussen. Det är det här som selektion går ut på, att ställa villkor och anpassa resultatet efter villkoret.


If-satser

If – Om. Med If-satser ställer du villkor för om något ska hända, de används oftast i tillsammans med Else som vi ska gå igenom lite längre ner i artikeln. Vi tar ett exempel med en gång.


program Selektion;

uses Crt;

{$APPTYPE Console}

var Regn : Char;

begin
WriteLn(’Regnar det ute? (J/N)’);
ReadLn(Regn);
{If-sats}
If (Regn = ’J’) Then
begin
WriteLn(‘Ta bilen!’);
end;
WriteLn(’Ha en bra dag!’);
ReadLn;
end.



Else

Men om det inte regnar, kan vi inte skriva ut något roligt då? Jo, det kan vi, med hjälp av else.


program Selektion;

uses Crt;

{$APPTYPE Console}

var Regn : Char;

begin
WriteLn(’Regnar det ute? (J/N)’);
ReadLn(Regn);
{If-sats}
If (Regn = ’J’) Then {notera: inget semikolon}
begin
WriteLn(‘Ta bilen!’);
end;
else {om det första villkoret inte uppfylls så sker följande}
begin
WriteLn(’Ta cykeln!’);
end;
WriteLn(’Ha en bra dag!’);
ReadLn;
end.



Jämförelseoperatorer

Det finns flera jämförelsemetoder att använda i if-satser. Den vi sett användas hitils är likhetstecknet (=). Här är några fler.
























JämförelseoperatorFörklaring
if (a = b) thenOm a är lika med b.
if (a > b) thenOm a är större än b.
if (a < b) thenOm a är mindre än b.
if (a >= b) thenOm a är större än eller lika med b.
if (a <= b) thenOm a är mindre än eller lika med b.
if (a <> b) thenOm a inte är lika med b.



Nästlade if-satser

Man kan även ha en if-sats i en if-sats, och en if-sats i den if-satsen, och en i den… Detta kallas för nästlade if-satser. Det kan se ut så här:


program NastladIf;

uses Crt;

{$APPTYPE Console}

var Regn, Mycket : Char;

begin
WriteLn(’Regnar det ute? (J/N)’);
ReadLn(Regn);
{If-sats}
If (Regn = ’J’) Then {notera: inget semikolon}
begin
WriteLn(‘Regnar det mycket? (J/N)’);
ReadLn(Mycket);
If (Mycket = ’J’) Then {regnar det mycket eller duggar det bara lite?}
begin
WriteLn(’Det regnar mycket, ta bilen!’);
end;
else
begin
WriteLn(’Det regnar lite, du kan nog ta cykeln i alla fall.’);
end;
end;
else {om det första villkoret inte uppfylls så sker följande}
begin
WriteLn(’Ta cykeln!’);
end;
WriteLn(’Ha en bra dag!’);
ReadLn;
end.



Else If

Ibland vill man ställa flera villkor, då används Else If.


program AnnarsOm;

uses Crt;

{$APPTYPE Console}

var Regn : Char;

begin
WriteLn(’Regnar det ute? (J/N)’);
ReadLn(Regn);
{If-sats}
If (Regn = ’J’) Then {notera: inget semikolon}
begin
WriteLn(‘Ta bilen!’);
end;
else if (Regn = ’N’) Then {om nej så}
begin
WriteLn(’Ta cykeln!’);
end;
WriteLn(’Ha en bra dag!’);
ReadLn;
end.



Övningar

1. Skriv ett program som låter användaren mata in sitt namn. Om namnet inte är det magiska namnet Nisse ska utskriften bli ”Hej Namn!”. Är namnet Nisse så blir utskriften istället ”Nämen tjenare Nisse, kul att ses!”.
1.5. Utöka programmet så att även ditt eget namn är ett ”magiskt” namn.
2. Gör ett program som kan omvandla Celsius till Fahrenheit, eller Fahrenheit till Celsius om användaren vill. F = 1.8 * C +32
3. Programmera spelet Sten, Sax, Påse. För exempel se: Sten, Sax, Påse


Avslutning

Nu har du lärt dig om if-satser. Dessa kommer du att använda mycket, ibland i samband med Sammansatta uttryck som vi kommer att titta närmare på i nästa artikel.
Upp

0 Kommentarer

Skriv en kommentar på artikeln

Ditt betyg på artikeln



Kommentar:





Nyligen

  • 09:09 Vill du köpa medicinska tester?
  • 12:47 Vem beviljar assistansen – kommune
  • 14:17 Någon med erfarenhet av hemstädnin
  • 14:14 Bör man använda sig av en båtförme
  • 14:12 Finns det någon intressant hundblo
  • 14:25 Tips på verktyg för att skapa QR-k
  • 14:23 Tips på verktyg för att skapa QR-k
  • 20:52 Fungerer innskuddsbonuser egentlig

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 569 159
27 952
271 704
1 411
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies