Photo AI

AFDELING A Vraag 1: ALGEMENE PROGRAMMERINGSVAARDIGHEDE Doen die volgende: - Maak die onvolledige program in die Vraag1.1-ergodig kopie - NSC Information Technology - Question 1 - 2018 - Paper 1

Question icon

Question 1

AFDELING-A--Vraag-1:-ALGEMENE-PROGRAMMERINGSVAARDIGHEDE--Doen-die-volgende:----Maak-die-onvolledige-program-in-die-Vraag1.1-ergodig-kopie-NSC Information Technology-Question 1-2018-Paper 1.png

AFDELING A Vraag 1: ALGEMENE PROGRAMMERINGSVAARDIGHEDE Doen die volgende: - Maak die onvolledige program in die Vraag1.1-ergodig kopie. - Steal jou euskensrekenaa... show full transcript

Worked Solution & Example Answer:AFDELING A Vraag 1: ALGEMENE PROGRAMMERINGSVAARDIGHEDE Doen die volgende: - Maak die onvolledige program in die Vraag1.1-ergodig kopie - NSC Information Technology - Question 1 - 2018 - Paper 1

Step 1

OnCreate-geberekening [Event]

96%

114 rated

Answer

Skryf die nodige kode in die 'OnCreate'-speelvenster om die waarde van die 'Form' te herwin. Dit kan lyk soos die volgende:

Procedure FormOnCreate(Sender: TObject);
begin
  // Kode om die program te start
  Label1.Caption := 'Welkom op die program';
end;

Step 2

Knoppie [1.2 - Vertoon]

99%

104 rated

Answer

Stel afloopvorm op 'n leë string met 'n onvoorwaardelike lus. Dit kan soos volg geskryf word:

var
  gebruikersinvoer: String;
begin
  gebruikersinvoer := '';
  for i := 'Z' to 'R' do
  begin
    gebruikersinvoer := gebruikersinvoer + i;
  end;
  Label1.Caption := gebruikersinvoer;
end;

Step 3

Knoppie [1.3.1 - Totale getal woorde]

96%

101 rated

Answer

Verklaring van die heeltalveranderlike vir die getal bladsye kan impliseer:

var
  TotaalWoorde: Integer;
begin
  // Lees die totale aantal woorde
  TotaalWoorde := 0;
  VBox1.Caption := IntToStr(TotaalWoorde);
end;

Step 4

Radiogroep [1.3.2 - Tipe boek]

98%

120 rated

Answer

Toets of literatuur geselekteer is en bepaal die totale getal woorde:

var
  LiteratuurGekies: Boolean;
begin
  LiteratuurGekies := RadioButton1.Checked;
  if LiteratuurGekies then
    Totaletotal := Totaletotal + 60;
end;

Step 5

Kombinasieblokkie [1.4 - Combo box]

97%

117 rated

Answer

Verklaar die veranderlikes as die regte datatipe en voeg 'n kombinasieblokkie in:

var
  gekies: String;
begin
  gekies := ComboBox1.Text;
  if gekies <> '' then
    Label1.Caption := 'Gekoë' + gekies;
end;

Step 6

Knoppie [1.5 - Koördinate]

97%

121 rated

Answer

Maak 'n afwerking soos volg:

var
  x, y: Integer;
begin
  x := 7;
  y := 12;
  Label1.Caption := Format('Koördinate: (%d, %d)', [x, y]);
end;

Join the NSC students using SimpleStudy...

97% of Students

Report Improved Results

98% of Students

Recommend to friends

100,000+

Students Supported

1 Million+

Questions answered

;