"Процессууд" бодлогын бодолт

shagai

var
a:array [1..200,1..200] of integer;
used,p:array [1..200] of boolean;

n,m,i,j,s,f,max,t,sol:integer;
d:boolean;
begin
   {assign(input,'in.put');reset(input);}
   readln(n,m);
   for i:=1 to m do
      begin
         readln(s,f);
         a[f,s]:=1;
      end;

   m:=n;max:=0;
   while m>0 do
   begin
      inc(sol);
      t:=0;
      for i:=1 to n do
      if not used[i] then
        begin
         d:=true;
         for j:=1 to n do
            if (a[i,j]<>0) and (not used[j]) then d:=false;
         p[i]:=d;
         if d then begin inc(t); dec(m); end;
        end;
      for j:=1 to n do begin used[j]:=used[j] or p[j]; p[j]:=false; end;
      if max<t then max:=t;
   end;
   max:=1;
   while max*sol<n do inc(max);
   writeln(sol,' ',max);
end.

"Жинхэнэ азтай билет" бодлогын бодолт

footman

#include <stdio.h>
#define max 1000000000
long n,s,i,j,k,l;
long long a[51][501][8]={0},x[8],y[16]={0},z;
void add()
{
 for (l=1; l<=6; l++)
    a[i][j][l]+=a[i-1][j-k][l];
 for (l=1; l<=6; l++)
    {a[i][j][l+1]+=a[i][j][l]/max; a[i][j][l]%=max;}
}
int main()
{
scanf("%ld %ld",&n,&s);
if (s%2) {printf("0\n"); return 0;}
s/=2;
a[0][0][1]=1;
for (i=1; i<=n; i++)
  {
  a[i][0][1]=1;
  for (j=1; j<=s; j++)
      for (k=0; k<=9; k++)
    if (j>=k) add();
  }

for (l=1; l<=6; l++)
  x[l]=a[n][s][l]-a[n-1][s][l];
for (l=1; l<=6; l++)
  if (x[l]<0) {x[l]+=max; x[l+1]--;}
for (i=1; i<=6; i++)
  for (j=1; j<=6; j++)
    y[i+j-1]+=a[n][s][i]*x[j];
for (l=1; l<=14; l++)
  {y[l+1]+=y[l]/max; y[l]%=max;}
for(l=15; y[l]==0; l--);
printf("%lld",y[l--]);
for (;l>0; l--)
  { for (z=max/10; z>y[l]&&z>0; z/=10)
      printf("0");
    printf("%lld",y[l]);
  }
return 0;
}

"Үндэс" бодлогын бодолт

program

//http://en.wikipedia.org/wiki/Prufer_sequence
//Sometimes answer is right on your screen!!
//regards wiki B.Tserenchimed
#include <stdio.h>
int main()
{
    int a[10000]={0};
    int d[10000]={0};
    int n=1,i,j;
    while (scanf("%d",&a[n])==1) n++;
    n-=2;
    if (n==0)
    {
        printf("1");
        return 0;
    }
//    printf("%d\n",n);
    for (i=1;i<=n+2;i++)
    d[i]=1;
     for (i=1;i<=n;i++)
    d[a[i]]++;
    j=1;
    for (i=2;i<=n+2;i++)
    if (d[i]>d[j]) j=i;
    printf("%d",j);
    return 0;
}

"Хуулбар" бодлогын бодолт

sw08d023

#include <cstdio>
#include <cstdlib>
main(){
       long int n,m;
       scanf("%ld%ld",&n,&m);
       printf("%ld",n+m-2);
//system("PAUSE");
return 0;
}

"Азкабан" бодлогын бодолт

melug

#include <stdio.h>
int min(int a,int b) {
        return (a>b)?b:a;
}
int max(int a,int b) {
        return (a>b)?a:b;
}
int GCD(int a,int b) {
        int t;
        while(b!=0) {
                t=b;
                b=a%b;
                a=t;
        }
        return a;
}
int main() {
        int M,N;
        scanf("%d %d",&M,&N);
        printf("%d\n",(N-1)+(M-1)-GCD(max(M-2,N-2),min(M-2,N-2))-1);
        return 0;
}

"Тоос сорогч" бодлогын бодолт

footman

#include <stdio.h>
int main()
{
long n,m;
scanf("%ld %ld",&n,&m);
printf("%ld",2*(n*m-1));
return 0;
}

Програмчлалын XVII онлайн тэмцээн

"Максимумууд" бодлогын бодолт

blueberry

#include <stdio.h>

int main()
{
  int n,m;
  int i,j;
  double s=0,max,r;
 
  scanf("%d %d",&m,&n);  
  
  for(i=0;i<m;i++)
    {
      max=0;
      for(j=0;j<n;j++)
    { 
          scanf("%lf",&r);
          if(r>max) max=r; 
        }
      s=s+max;
     } 
  printf("%.3lf\n",s);

  return 0;

  }

"Хазайлт" бодлогын бодолт

alaka

#include<stdio.h>
#include<stdlib.h>
#include<math.h>
int main()
{
 int i=1,k;
 float s=0,min=100000;
 float a[10000],;
 
    while(scanf("%f",&a[i])!=EOF)
    {
            
    //scanf("%f",&a[i]);
        s=s+a[i];
        i++;
        
         }
         //printf("%d",i-1);
        float f=s/(i-1)*1.0,p,m=3000.00000;
         //printf("%f",f);
         for(k=1; k<i; k++){
         if(fabs(a[k]-f)<m)
         m=fabs(a[k]-f);
         }
         printf("%.2f",m);
         
    system("Pause");
    return 0;
    
}

"Давхардалт" бодлогын бодолт

Mergen

#include<map>
#include<stdio.h>
using namespace std;

map<int, int> v;
int main() {
  int a;
  while(scanf("%d",&a)!=EOF) {
    if (v[a] == 1) {
      printf("YES\n");
      return 0;
    }
    v[a] = 1;
  }

  printf("NO\n");
  return 0;
}

"Анхны тоон дөрвөл" бодлогын бодолт

Khongor

var n,i:longint;
Function check(n:longint):boolean;
var i:longint;
begin
check:=true;
for i:=2 to trunc(sqrt(n)) do
if n mod i=0 then begin check:=false; exit; end;
end;
Begin
readln(n);
if n mod 10=9 then n:=n+1;
if (n<19) and (n>=7) then begin writeln('2 3 5 7'); exit; end;
i:=n-(n mod 10)-9;
while i>0 do
begin
if check(i) and check(i+2) and check(i+6) and check(i+8) then begin writeln(i,' ',i+2,' ',i+6,' ',i+8); exit; end;
i:=i-10;
end;
end.

"Цаг минут секунд" бодлогын бодолт

bodolt

var t:array[1..12] of longint;
i,n,h,m,s:longint;
tt:longint;
begin
t[1]:=0;
t[2]:=trunc(3600*12/11+1);
t[3]:=trunc(3600*12*2/11+1);
t[4]:=trunc(3600*12*3/11+1);
t[5]:=trunc(3600*12*4/11+1);
t[6]:=trunc(3600*12*5/11+1);
t[7]:=trunc(3600*12*6/11+1);
t[8]:=trunc(3600*12*7/11+1);
t[9]:=trunc(3600*12*8/11+1);
t[10]:=trunc(3600*12*9/11+1);
t[11]:=trunc(3600*12*10/11+1);
t[12]:=trunc(3600*12);
readln(h,m,s);
tt:=3600*h+60*m+s;
for i:=1 to 12 do
if tt<=t[i] then
begin
writeln(t[i]-tt);
exit
end;
readln;
end.

Програмчлалын XVI онлайн тэмцээн

Энд дарж орно уу.

Програмчлалын XV онлайн тэмцээний "Рекурс" бодлогын бодолт

Chimed

#include <cstdio>
#include <algorithm>
#include <vector>
using namespace std;
bool cicle[1001]={0};
bool visited[1001];
int save[1001];
vector <vector <int> > g(1001);
void dfs(int start,int index){
    save[index]=start;
    visited[start]=true;
    int q,r;
    for (q=0;q<g[start].size();q++)
    if (visited[g[start][q]])
    {
        for (r=0;r<index;r++)
        if (save[r]==g[start][q]) break;
        for (;r<=index;r++)
        cicle[save[r]]=true;
    }
    else
        dfs(g[start][q],index+1);
}
int main(){
    int N;
    int i,j,k,t;
    scanf("%d",&N);
    for (i=1;i<=N;i++)
    {
        scanf("%d",&k);
        for (j=0;j<k;j++)
        {
            scanf("%d",&t);
            g[i].push_back(t);
        }
    }
    for (i=1;i<=N;i++)
    if (cicle[i]) printf("%d ",i);
    else
    {
        for (j=1;j<=N;j++)
            visited[j]=false;
        dfs(i,0);
        if (cicle[i]) printf("%d ",i);
    }
    return 0;
}

Програмчлалын XV онлайн тэмцээний "Квадратууд" бодлогын бодолт

Chimed

#include <cstdio>
#include <vector>
#include <algorithm>
#include <iostream>
#include <map>
#include <cmath>
using namespace std;
double a,b,c;
double x1[1000],x2[1000],y3[1000],y2[1000];
double x[2000],y[2000];
char table[2000][2000]={0};
int n,i,xi1,xi2,yi1,yi2,j,k;
double answer=0.0;
int main(){
    scanf("%d",&n);
    for (i=0;i<n;i++)
    {
        scanf("%lf %lf %lf",&a,&b,&c);
        x1[i]=a-c/2;
        y3[i]=b-c/2;
        x2[i]=a+c/2;
        y2[i]=b+c/2;
        x[2*i]=x1[i];
        x[2*i+1]=x2[i];
        y[2*i]=y3[i];
        y[2*i+1]=y2[i];
    }
    sort(x,x+2*n);
    sort(y,y+2*n);
    for (i=0;i<n;i++)
    {
        xi1=lower_bound(x,x+2*n,x1[i])-x;
        xi2=lower_bound(x,x+2*n,x2[i])-x;
        yi1=lower_bound(y,y+2*n,y3[i])-y;
        yi2=lower_bound(y,y+2*n,y2[i])-y;
        for (j=xi1;j<xi2;j++)
            for (k=yi1;k<yi2;k++)
            table[j][k]=1;
    }
    for (j=0;j<2*n;j++)
        for (k=0;k<2*n;k++)
        if (table[j][k])
        {
        //    printf("%.1lf %.1lf %.1lf %.1lf\n",x[j],y[k],x[j+1],y[k+1]);
            answer+=(x[j+1]-x[j])*(y[k+1]-y[k]);
        }
    printf("%.3lf",answer);
    return 0;
}

Програмчлалын XV онлайн тэмцээний "Координатын эх" бодлогын бодолт

bodolt

var x,y:array[0..5]of double;
s1,s2,s3,s4:double;
n,i,j:integer;
begin
readln(n);
for i:=1 to n do
begin
for j:=1 to 3 do
read(x[j],y[j]);
s1:=abs(y[1]*(x[3]-x[2])+y[2]*(x[1]-x[3])+y[3]*(x[2]-x[1]));
s2:=abs(y[3]*x[2]-y[2]*x[3]);
s3:=abs(y[1]*x[3]-y[3]*x[1]);
s4:=abs(y[2]*x[1]-y[1]*x[2]);
if s1=s2+s3+s4 then writeln('YES')
               else writeln('NO');
end;
readln;
end.

Програмчлалын XV онлайн тэмцээний "Уламжлал" бодлогын бодолт

bodolt

var p,q,t:array[0..100]of real;
n,i,l:integer;
s,t1:real;
begin
readln(s,t1,n);
for i:=0 to n do
read(p[i]);
q[0]:=p[0]*t1;
q[1]:=p[1]*t1;
for i:=2 to n+2 do
q[i]:=p[i]*t1+p[i-2]*s;
for i:=0 to n-1 do
t[i]:=p[i+1]*(i+1);
t[n]:=0;
t[n+1]:=0;
l:=n+2;
while t[l]+q[l]=0 do
l:=l-1;
for i:=0 to l-1 do
write((q[i]+t[i]):0:1,' ');
write((q[l]+t[l]):0:1);
readln;
end.

Програмчлалын XV онлайн тэмцээний "Чөтгөрийн тоо" бодлогын бодолт

bodolt

var a,a1,a2:array[1..20]of int64;
n,k,i:integer;
begin
read(n,k);
if k>6 then
begin
a[1]:=k-2;
a1[1]:=1;
a2[1]:=0;
a[2]:=(k-1)*(k-1);
a1[2]:=k-2;
a2[2]:=1;
for i:=3 to n do
begin
a[i]:=(k-1)*(a1[i-1]+a2[i-1]+a[i-1]);
a1[i]:=a[i-1];
a2[i]:=a[i-2];
end;
writeln(a[n]+a1[n]+a2[n]);
end
else
begin
a[1]:=k-1;
for i:=2 to n do
a[1]:=a[1]*k;
writeln(a[1]);
end;
readln;
end.