Rabu, 01 Oktober 2014

tugas 15

 Tugas 15
Algoritma
kamus
    x,y : Integer
Begin
    x <- 15
    y <- 8
    z <- 7
    x <- y + x
    y <- x - y
    Output (x)
    Output (y)
end.

Pascal

 uses crt;

var
  x,y,z : integer;

begin

  x := 15;
  y := 8;
  z := 7;
  x := y + x;
  y := x - y;
  writeln('maka nilai x: ',x);
  writeln('maka nilai y: ',y);
  readln();

end.

Tidak ada komentar:

Posting Komentar