Scribd
Upload
166 views

2018 Paper 3 Specimen Mark Scheme

This document contains sample questions and answers for a Computer Science exam. It includes questions on using variables and conditionals in code, generating random numbers, nested loops to create patterns, determining if a number is even or odd, basic HTML tags, and entity relationship diagrams showing relationships between customers, products and orders. The document was compiled by an engineer as a specimen mark scheme.

Uploaded by

gangstar sippas
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as PDF, TXT or read online on Scribd
166 views

2018 Paper 3 Specimen Mark Scheme

This document contains sample questions and answers for a Computer Science exam. It includes questions on using variables and conditionals in code, generating random numbers, nested loops to create patterns, determining if a number is even or odd, basic HTML tags, and entity relationship diagrams showing relationships between customers, products and orders. The document was compiled by an engineer as a specimen mark scheme.

Uploaded by

gangstar sippas
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as PDF, TXT or read online on Scribd
You are on page 1/ 7

Computer Science 2018 Specimen Mark Scheme 4021/3 compiled by Engineer Nyamz

Question 1

Public Class Form1

Private Sub btnResult_Click(ByVal sender As System.Object, ByVal


e As System.EventArgs) Handles btnResult.Click

Dim name As String


name = txtName.Text
MsgBox("Hello " & name)

End Sub
End Class
Computer Science 2018 Specimen Mark Scheme 4021/3 compiled by Engineer Nyamz

Question 2

Public Class Form1


Private Sub btnRandom_Click(ByVal sender As System.Object, ByVal e
As System.EventArgs) Handles btnRandom.Click

Dim rand As New Random


Dim randomnumber As Integer
randomnumber = rand.Next(1, 6)
txtRandom.Text = randomnumber
End Sub
End Class

Question 3

Module Module1

Sub Main()

Dim i, j As Integer
For i = 1 To 5
For j = 1 To 5
Console.Write("#")
Next j
Console.WriteLine()
Next i
Console.ReadKey()

End Sub

End Module
Computer Science 2018 Specimen Mark Scheme 4021/3 compiled by Engineer Nyamz

Question 4

Public Class Form1

Private Sub btnResult_Click(ByVal sender As System.Object, ByVal


e As System.EventArgs) Handles btnResult.Click

Dim number As Integer


number = txtNumber.Text
If number Mod 2 = 0 Then
MsgBox("Number entered is even")
Else
MsgBox("Number entered is not even")
End If

End Sub
End Class
Computer Science 2018 Specimen Mark Scheme 4021/3 compiled by Engineer Nyamz

Question 5(a) and 5(b)

<html>

<head>

<title>Matulise</title>

</head>

<body>

<h>Welcome to Frecy High School</h>

<p>We offer Arts, Commercials and Sciences at 'A'Level</p>

<p>We offer practical subject at 'O'Level</p>

<p><img src ="C:\Users\nyamz\Desktop\COVID 19\covid.jpg">

<img src ="C:\Users\nyamz\Desktop\COVID 19\class.jpg"></p>

</body>

</html>

[20]
Computer Science 2018 Specimen Mark Scheme 4021/3 compiled by Engineer Nyamz

Question 6a

Customers

Products

Orders

Question 6(b)
Computer Science 2018 Specimen Mark Scheme 4021/3 compiled by Engineer Nyamz

Question 6(c)

Question 6(d)

Question 6(e)
Computer Science 2018 Specimen Mark Scheme 4021/3 compiled by Engineer Nyamz

You might also like