Microsoft Small Basic

Program Listing:
Embed this in your website
TextWindow.Write("Zadej dnešní teplotu(v °C): ")
teplota = TextWindow.ReadNumber()
If teplota > 30 Then
 'Pokud je teplota větší než 30
 TextWindow.WriteLine("Dnes je docela horko.")
ElseIf teplota > 20 Then
 'A nebo pokud je teplota větší než 20
 TextWindow.WriteLine("Dnes je docela pěkně.")
ElseIf teplota > 10 Then
 'A nebo pokud je teplota větší než 10
 TextWindow.WriteLine("Nezapomeň si kabát.")
Else
 'Nebo ...
 TextWindow.WriteLine("Zůstaň radši doma.")
EndIf
Copyright (c) Microsoft Corporation. All rights reserved.