BEGIN N := N + 1; SUM := SUM + PRICE; IF PRICE > MAX THEN MAX := PRICE; READON(PRICE); END; WRITE(N,SUM,MAX)
... Headquarters (GCHQ) Joint Intelligence Committee (JIC) MI8 (Defunct) Secret Intelligence Service (SIS/MI6) Security Service (MI5) Special Operations Executive ...