tugas 18

 Tugas 18
Algoritma

Input (N)

if N<10 then
    n <- n + 5
end if

output (n)

Pascal

 uses crt;

var
 n : integer;

begin
 write('masukan nilai n: '); readln(n);
 if n < 10 then
   n := n + 5
 end.
 writeln('maka nilai n adalah: ',n);
 readln();
end