1-
Dim RightNow
RightNow = Time
Print " the Time Now Is " & RightNow
Dim Today
Today = Date
Print " Today is " & Today
1- مانتيجة تنفيذ العلمية التالية على جهاز الحاسب
IF Grad >=33 THEN
Result" ناجح " =
Else
Result" غير مجتاز " =
END IF