AS/A2 computing 2013 July batch

[Ravichandran]

Dear students of Block 6 AS computing, welcome to the computing class. I am your facilitator Dr.Ravichandran ( you can call me Dr.Ravi), I will be your course facilitator for AS computing and A2 computing. I will start communicating with you in this discussion forum - where you can start posting your queries and useful resources.

You are highly encouraged to interact with me and also with your peers as the class begins from 30th July 2013.

All the best and keep moving. Do not hesitate to ask and send your queries if you have one.

Regards,

Dr.Ravichandran

i HAVE ATTACHED THE SYLLABUS TOO.

YOU CAN DOWNLOAD THE ATTACHMENT FILE.

[Ameer Sorne]

here's mine :v [ pls check it Dr ><]

Dim eve(10), odd(10)
For i = 1 To 10
a = InputBox("num")
b = Len(a)

For j = 1 To b
c = Mid(a, j, 1)
If c / 2 = Int(c / 2) Then
e = e + 1
eve(e) = c
Else
o = o + 1
odd(o) = c
End If
Next j
Print a
For k = 1 To e
Print "even= " + Str(eve(k))

Next k
e = 0
For l = 1 To o
Print "odd= " + Str(odd(l))

Next l
o = 0
Next i

[SuhenR]

Write a VB program source code to store 10 names and 10 phone numbers in a single dimensional array and given the name print the corresponding phone number .  

           I hope this is correct :) 

Dim nam(10), hp(10), find(10)
Private Sub Command1_Click()

For i = 1 To 10
nam(i) = InputBox(" Enter Name ")
hp(i) = InputBox(" Enter HP number ")
Next i
For x = 1 To 10
find(x) = InputBox(" Enter name to find the HP number ")
For i = 1 To 10
If find(x) = nam(i) Then Print hp(i) + "----for---" + nam(i)
Next i
MsgBox (" Next name ")
Form1.Cls
Next x
End

End Sub

[Ameer Sorne]

25/9 homework:

Dim n(20)
Dim ee, ff As String

For i = 1 To 20
If (i / 2) <> Int(i / 2) Then
nama = nama + 1
a = InputBox("Nama " + Str(nama))
n(i) = a
Else
tel = tel + 1
b = InputBox("Nombor " + Str(tel))
n(i) = b
End If
Next i

c = 1
d = 2

For j = 1 To 10
ee = n(c)
ff = n(d)
Print "Nama: "+ee + " >Nombor: " + ff
c = c + 2
d = d + 2
Next j

[Ariel Logujin Takom]

For yesterday's homework (25th September 2013), we were asked to write a program to accept 10 names and their handphone numbers, and when we type the name of the person, his/her corresponding number is displayed.

This is my code, with some corrections by Dr. Ravi and Ameer. Thank you so much! :D

Dim nam(10), hp(10), c(50)
Dim m, n As String
Private Sub Command1_Click()
For i = 1 To 10
nam(i) = InputBox("Please enter a name")
hp(i) = InputBox("Please enter his/her handphone number")
Next i
MsgBox "Enter the name of the person to get his/her phone number"
For x = 1 To 50
c(x) = InputBox("Please enter his/her name")
For i = 1 To 10
m = nam(i)
n = hp(i)
If c(x) = m Then MsgBox m + "'s number is " + n
Next i
MsgBox "Press OK to find the number of another person"
Next x
End
End Sub

[Megat Muhammad Nasir]

My program for yesterday's homework

Dim nam(10), num(10)

For i = 1 to 10

a = InputBox("enter name")

b = InputBox("enter phone number")

nam(i) = a

num(i) = b

Next i

c = InputBox("enter the name")

For i = 1 to 10

If c = nam(i) Then Print num(i): MsgBox("Done"): End

Next i

End

[Ravichandran]

End of semester Exam results out of 75.

Nabil Izzularif - 7438 - 56/75

Syed Muhammad - 7558  - 51/75

Ariel 0 7469 - 49/75

Ahmad Ammar - 7467 - 40/75

Mohamad Ameer - 7572 - 39/75

Suhen Rajasegaran - 29/75

Mohammad Aimen - 7483 - 63/75

Yuganesh - 7476 - 57/75

Mohd Arif - 7598 - 50/75

Mohammad Luckman - 60/75

Raid Syamil - 7577 - 49/75

Megat - 7573 - 66/75

M.Hafiz - 7409 - 43/75

Maizatul - 7391 - 26/75

The overall performance of the students in theory were alarming. I can see some good programming from few students. However, there is long way to go in progrmaming to score full marks. The quality of answer and language was not UK standard. I fell except Megat all other student need to improve their answering skills. Students who have scored more than 60 and above out of 75 may be A grade students, other who have scored less than 50 are more likely to get B or C. So, please watchout and work hard.

Dr.Ravi

[Mohd Afif Farhan b. Mat Said]

dear dr. Ravi

i'm Farhan. it seemed that my name and id number is wrong. name=Afif, id no.=7597

[Ravichandran]

Hi Farhan,
What do you mean by typing name=Afif, id no.=7597.
I am also too confused. Tell all of Block 6 that tomorrow is a compulsory class.
What is your full name, and what is your ID.
Ravi

[Ravichandran]

Nabil Izzularif - 7438 - 56/75

Syed Muhammad - 7558 - 51/75

Ariel 0 7469 - 49/75

Ahmad Ammar - 7467 - 40/75

Mohamad Ameer - 7572 - 39/75

Suhen Rajasegaran - 29/75

Mohammad Aimen - 7483 - 63/75

Yuganesh - 7476 - 57/75

Mohd AfIf Farhan - 7597 - 50/75

Mohammad Luckman - 60/75

Raid Syamil - 7577 - 49/75

Megat - 7573 - 66/75

M.Hafiz - 7409 - 43/75

Maizatul - 7391 - 26/75

The overall performance of the students in theory were alarming. I can see some good programming from few students. However, there is long way to go in progrmaming to score full marks. The quality of answer and language was not UK standard. I fell except Megat all other student need to improve their answering skills. Students who have scored more than 60 and above out of 75 may be A grade students, other who have scored less than 50 are more likely to get B or C. So, please watchout and work hard.

Dr.Ravi

[Ravichandran]

Raid scored 80 out of 100

[Mohd Afif Farhan b. Mat Said]

Dear dr.Ravi

There have been some corrections in our mark

mohd afif farhan - 81/100

mohd raid syamil - 80/100

[Muhammad Hafiz Amzar Bin Hussain]

Dear Dr. Ravi

There have been a slight change in my marks for the end of semester examination.
My initial marks is 43/75. My new marks is 46/75.

Thank you for your time Dr. and have a nice holiday.