program A, B : integer ; begin A := 5; input B; output A, B; end ;