//Dev-C++ 5.11
#include <stdio.h>
int main(void)
{float a[10][10]={0},newar[100]={0},min=2147483647;
int i,j,n,c,coucurr=1,newn=0,boo=0;
scanf("%d",&n);
for(i=0;i<n;i++)
for(j=0;j<n;j++)
{scanf("%f",&a[i][j]);
newar[newn]=a[i][j];
newn++;}
for(i=0;i<newn;i++)
{for(j=0;j<newn;j++)
if (newar[i]==newar[j] && i!=j)
coucurr++;
if (coucurr>1 && min>newar[i])
{min=newar[i]; boo=1;}
coucurr=1;}
if(boo)
printf("%f",min);
else
printf("Nothing");
return 0;}
Пример ввода:
3
1
2
2
3
3
3
4
4
4
Пример вывода:
2<span />
С помощью Конструктора и мастера
Var
s,fam,nam:string;
begin
writeln('Vvedite imy i familiy:');
readln(s);
nam:=copy(s,1,pos(' ',s)-1);
fam:=copy(s,pos(' ',s)+1,length(s));
if nam[length(nam)]=fam[length(fam)-1] then writeln('Sovpadayut') else writeln('Ne sovpadayut');
write('Dly vyhoda nagmite Enter');
readln;
end.
var n,i,s,k:integer;
Begin
for i:=1 to 7 do Begin
read(n);
if n>0 then k:=k+1;
if n<0 then s:=s+n;
end;
writeln(k,s);
End.