C :

#include<stdio.h>
void f(int n)
{
	int a,b,c,d;
	a=n/1000;
	b=n/100%10;
	c=n/10%10;
	d=n%10;
	printf("%c %c %c %c\n",a+48,b+48,c+48,d+48);
}
int main(void)
{
	int n;
	scanf("%d",&n);
	f(n);
	return 0;
}

C++ :

#include <stdio.h>
int main() {
	void output(char digits[]);
	char str[5];
	gets(str);
	output(str);
	return 0;
}
void output(char digits[]) {
	int i;
	for (i = 0;i < 4;i++) {
		if (i > 0)
			printf(" ");
		printf("%c", digits[i]);
	}
	puts("");
}

Pascal :

var
  n,a,b,c,d:longint; 
begin
  readln(n);
  a:=n div 1000;
  b:=n div 100 mod 10;
  c:=n div 10 mod 10;
  d:=n mod 10;
  writeln(a,' ',b,' ',c,' ',d);
end.

Java :

import java.util.Scanner;

public class Main {
   private static Scanner s = new Scanner(System.in) ;
   
   public static void main(String[] args) {
	   Integer n = s.nextInt() ;
	   
	   if(1000<=n&&n<=9999){
		   char c[] = n.toString().toCharArray() ;
		   
		   for (int i = 0; i < c.length-1; i++) {
			 System.out.print(c[i] + " ") ;
		   }
		   System.out.println(c[c.length-1]);
	   }
   }
}