#include<stdio.h>
#include<conio.h>
int funk(int n);
void main()
{
clrscr();
int n,d;
printf("‚ўҐ¤ЁвҐ зЁб«® n:\n");
scanf("%d",&n);
d=funk(n);
printf("%d",&d);
getch();
}
int funk(int n)
{
clrscr();
int i;
if(n>2)
{
for(i=n;i<n*2-1;i++)
{
int d=0,k;
for(k=2; k<=i/2; k++)
if(i%k==0)
d++;
if(d==0){
int t=i+2;
for(k=2;k<t/2; k++)
if(t%k==0)
d++;
if(d==0)
printf("—Ёб«  %d Ё %d Ў«Ё§ҐжЁ",i,t);
else
printf("\t ЌҐв Ї а Ў«Ё§Ґж®ў\n");
}
}
   }    }

#include<stdio.h>
#include<stdlib.h>
#include<graphics.h>
#include<conio.h>
#include<dos.h>
#define PATH "d:\\work\\borlandc\\bin\\"

void okr(int x,int y,int r, int c)
{
    setcolor (c);
    circle(x,y,r);
}

void main(void)
{
    int gdriver=DETECT,gmode,errorcode,x,y,r=5,maxx;
    #define dt 30
    #define dx 5
    initgraph(&gdriver,&gmode,PATH);
    errorcode=graphresult();
    if(errorcode==grOk)
    {
        randomize();
        x=10;
        y=10;
        maxx=getmaxx();
        delay(2500);
        while(y<470)
        {
            okr(random(470),y,r,random(13)+1);
            delay(dt);
            okr(random(470),y,r,random(13)+1);
            y+=dx;
        }
        while(x<639)
        {
            okr(x,random(630),r,random(13)+1);
            delay(dt);
            okr(x,random(630),r,random(13)+1);
            x+=dx;
        }
        while(x>0&&y>0)
        {
            okr(x,y,r,random(13)+1);
            delay(dt);
            okr(x,y,r,random(13)+1);
            x-=dx;
            y-=dx/1.5;
        }
        closegraph();
    }
    else
    {
        printf("ЋиЁЎЄ :%d\n",errorcode);
        puts("„«п § ўҐаиҐЁп Їа®Ја ¬¬л  ¦¬ЁвҐ <Enter>");
        getch();
    }

}