C :

#include<stdio.h>
int main()
{
	int a[100];
	int n, x, i;
	scanf("%d", &n);
	
	for(i=0; i<n; i++)
	{
		scanf("%d", &a[i]);
	
	}
	scanf("%d", &x);
	a[n] = x;
	for(i=0; i<n; i++)
	{
		if(a[i] <= x)
		{
			a[i] = 2 * a[i];
		}
	
	}
	for(i=0; i<n; i++)
	{
		if(i>0)printf(" ");

		printf("%d", a[i]);
	
	}
	return 0;

}

C++ :

#include<stdio.h>
int main()
{
	int a[100];
	int n, x, i;
	scanf("%d", &n);
	
	for(i=0; i<n; i++)
	{
		scanf("%d", &a[i]);
	
	}
	scanf("%d", &x);
	a[n] = x;
	for(i=0; i<n; i++)
	{
		if(a[i] <= x)
		{
			a[i] = 2 * a[i];
		}
	
	}
	for(i=0; i<n; i++)
	{
		if(i>0)printf(" ");

		printf("%d", a[i]);
	
	}
	return 0;

}

Pascal :

program exj;
var
  x,i,n:integer;
  a:array[1..100] of integer;
  begin
  read(n);
  for i:=1 to n do
  read(a[i]);
  read(x);
  for i:=1 to n do
  begin
    if a[i]<=x then a[i]:=a[i]*2;
  end;
  for i:=1 to n-1 do
  write(a[i],' ');
  write(a[n]);
end.