Question

Plis bantuannya sama caranya
Algoritma
Var a,b,c : String;
X:int;
Begin
Clrscr;
Write (‘Masukkan tulisan 1 =’);
Readln(a);
Write(‘Masukkan tulisan 2 =’);
Readln(b);
Write(‘Masukkan tulisan 3=’);
Readln(c );
Write(‘Masukkan sembarang angka=’);
Readln(X);
If(X<5)
For X to 5 Do
Begin
If(X%3 = 0) Writeln(concat(a,X,b);
Else Writeln(concat(a,X,c);
End;
End;

Berapa kali tulisan tercetak jika :
i. A = “Kelinci diolah ”
ii. B = “ Menjadi ”
iii. C = “ Makanan “
iv. X = 2
a. 0
b. 1
c. 2
d. 3
e. 4

Answer 1

Type your answer here