{"id":23635,"date":"2012-11-29T14:38:27","date_gmt":"2012-11-29T11:38:27","guid":{"rendered":"http:\/\/studentpmr.ru\/?p=23635"},"modified":"2012-11-29T14:38:27","modified_gmt":"2012-11-29T11:38:27","slug":"%d0%be%d0%b4%d0%bd%d0%be%d0%bc%d0%b5%d1%80%d0%bd%d1%8b%d0%b5-%d0%bc%d0%b0%d1%81%d1%81%d0%b8%d0%b2%d1%8b","status":"publish","type":"post","link":"https:\/\/studentpmr.ru\/?p=23635","title":{"rendered":"\u041e\u0434\u043d\u043e\u043c\u0435\u0440\u043d\u044b\u0435 \u043c\u0430\u0441\u0441\u0438\u0432\u044b"},"content":{"rendered":"<p>\/\/vvesti s klaviatury odnomrernyj massiv tselyh chisel<br \/>\n\/\/i vyvesti na ekran kolichestvo nenulevyvh elementov<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 15<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n printf(&#171;Vvedite %i elementov massiva tselyh chisel:\\n&#187;,size);<br \/>\n int a[size],i,k=0;<br \/>\n for(i=0;i<size;i++)\n \t{\n    printf(\"A[%i]> &#171;,i+1);<br \/>\n    scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n    if(a[i]!=0)<br \/>\n    \tk++;<br \/>\n   }<br \/>\n printf(&#171;Bylo vvedeno %i nenulevyh elementov&#187;,k);<br \/>\n getch();<br \/>\n}<br \/>\n<!--more--><\/p>\n<p>************************************************************************<br \/>\n\/\/vychislit&#8217; srednee arifmeticheskoe nenulevyh elementov vved`nnogo massiva tselyh chisel<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n printf(&#171;Vvedite massiv iz %i tselyh chisel:\\n&#187;,size);<br \/>\n int a[size],i,n=0;<br \/>\n float s=0;<br \/>\n for(i=0;i<size;i++)\n \t{\n    printf(\"A[%i]> &#171;,i+1);<br \/>\n    scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n    if(a[i]!=0)<br \/>\n    \tn++;<br \/>\n    s+=a[i];<br \/>\n   }<br \/>\n printf(&#171;Srednee arifmeticheskoe nenulevyh elementov ravno %.2f&#187;,s\/n);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/najti kolichestvo otritsatel&#8217;nyh elementov v massive tselyh chisel<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 20<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],i,k=0;<br \/>\n printf(&#171;Vvedite %i tselyh chisel:\\n&#187;,size);<br \/>\n for(i=0;i<size;i++)\n \t{\n    printf(\"A[%i]> &#171;,i+1);<br \/>\n    scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n    if(a[i]<0)\n    \tk++;\n   }\n printf(\"Bylo vveddeno %i otritsatel'nyh chisel\",k);\n getch();\n}\n\n\n************************************************************************\n\/\/vychislit' srednee arifmeticheskoe dejstvitel'nogo massiva\n\/\/bez uch`ta minimal'nogo i maksimal'nogo elementov\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n printf(&#171;Vvedite %i dejstvitel&#8217;nyh chisel:\\n&#187;,size);<br \/>\n float a[size],min=10e+37,max=0,s=0;<br \/>\n short i,indexmin,indexmax;<br \/>\n for(i=0;i<size;i++)\n \t{\n    printf(\"A[%i]> &#171;,i+1);<br \/>\n    scanf(&#171;%f&#187;,&#038;a[i]);<br \/>\n    if(a[i]<min)\n    \t{\n       min=a[i];\n       indexmin=i;\n      }\n\t if(a[i]>max)<br \/>\n\t\t{<br \/>\n\t\t max=a[i];<br \/>\n\t\t indexmax=i;<br \/>\n\t\t}<br \/>\n\t}<br \/>\n for(i=0;i<size;i++)\n \tif(i==indexmin||i==indexmax)\n   \ts+=a[i];\n printf(\"Srednee arifmeticheskoe: %.3f\",s\/8);     \n getch();\n}\n\n\n************************************************************************\n\/\/proverit', obrazuyut li elementy massiva vozrastayuschyuyu posledovatel'nost'\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 15<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float a[size];<br \/>\n short i,f=0;<br \/>\n printf(&#171;Vvedite vozrastayuschyuyu posledovatel&#8217;nost&#8217; iz %i chisel:\\n&#187;,size);<br \/>\n for(i=0;i<size;i++)\n \t{\n    printf(\"A[%i]> &#171;,i+1);<br \/>\n    scanf(&#171;%f&#187;,&#038;a[i]);<br \/>\n    if(i!=0)<br \/>\n    \tif(a[i-1]>=a[i])<br \/>\n      \t{<br \/>\n          f=1;<br \/>\n          break;<br \/>\n         }<br \/>\n\t}<br \/>\n if(f)<br \/>\n \tprintf(&#171;Eto ne vozrastayuschyaya posledovatel&#8217;nost'&#187;);<br \/>\n else<br \/>\n \tprintf(&#171;Da, eto vozrastayuschyaya posledovatel&#8217;nost'&#187;);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/skolko raz v massive vstrechaetsya vved`nnoe s klaviatury chislo?<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 25<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],chislo,i,count=0;<br \/>\n printf(&#171;Vvedite tseloe chislo: &#171;);<br \/>\n scanf(&#171;%i&#187;,&#038;chislo);<br \/>\n printf(&#171;Vvedite massiv iz %i tselyh chisel:\\n&#187;,size);<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t if(a[i]==chislo)<br \/>\n    \tcount++;<br \/>\n   }<br \/>\n printf(&#171;Chislo %i vstrechaetsya v massive %i raz&#187;,chislo,count);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/est&#8217; li v massive elementy s odinakovymi znacheniyami?<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],i,j,count=0;<br \/>\n printf(&#171;Vvedite massiv iz %i tselyh chisel:\\n&#187;,size);<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t for(j=0;j<i;j++)\n\t\tif(a[i]==a[j])\n\t\t\tcount++;\n\t}\n if(count)\n \tprintf(\"Vo vved`nnom massive est' odinakovye znacheniya\");\n else\n \tprintf(\"Vo vved`nnom massive net odinakovyh znachenij\");    \n getch();\n}\n\n\n************************************************************************\n\/\/metodom pryamogo vybora uporyadochit' po ubyvaniyu tselochislennij massiv\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 50<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],i,j,min,poz,tmp;<br \/>\n printf(&#171;\\tMetod pryamogo vybora\\n&#187;);<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%i]=\",i+1);\n\t scanf(\"%i\",&#038;a[i]);\n\t}\n for(i=0;i<size-1;i++)\n\t{\n\t min=2147483647;\n\t for(j=i;j<size;j++)\n\t\tif(a[j]<min)\n\t\t\t{\n\t\t\t min=a[j];\n\t\t\t poz=j;\n\t\t\t}\n\t\ttmp=a[i];\n\t\ta[i]=a[poz];\n\t\ta[poz]=tmp;\n\t}\n printf(\"\\nOtsortirovannyj po ubyvaniyu massiv:\\n\");\n for(i=0;i<size;i++)\n\t printf(\"A[%i]=%i\\n\",i+1,a[i]);\n getch();\n}\n\n\n************************************************************************\n\/\/otsortirovat' odnomernyj massiv metodom obmena (\"puzyr'ka\") po vozrastaniyu\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],i,j,tmp;<br \/>\n printf(&#171;\\tMetod obmena (&#171;&#187;puzyr&#8217;ka&#187;&#187;)\\n&#187;);<br \/>\n for(i=0;i<n;i++)\n\t{\n    printf(\"A[%i]> &#171;,i+1);<br \/>\n    scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n \tfor(j=i+1;j<n;j++)\n      if(a[i]>a[j])<br \/>\n      \t{<br \/>\n          tmp=a[i];<br \/>\n          a[i]=a[j];<br \/>\n          a[j]=tmp;<br \/>\n\t\t\t}<br \/>\n printf(&#171;\\nOtsortirovannyj massiv:\\n&#187;);<br \/>\n for(i=0;i<n;i++)\n \tprintf(\"A[%i]=%i\\n\",i+1,a[i]);        \n getch();\n}\n\n\n\n************************************************************************\n\/\/predstavlyayut li elementy massiva dejstvitel'nyh chisel ubyvayuschyuyu posledovatel'nost'?\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float a[size];<br \/>\n int i,f=1;<br \/>\n printf(&#171;Vvedite %i dejstvitel&#8217;nyh chisel\\n&#187;,size);<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%f&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=1;i<size;i++)\n\tif(a[i]<a[i-1])\n\t\tf=0;\n\telse\n\t\t{\n\t\t f=1;\n\t\t break;\n\t\t}\n if(f)\n \tprintf(\"Elementy massiva ne yavlyayutsya ubyvayaschej posledovatel'nost'yu\");\n else\n \tprintf(\"Elementy massiva yavlyayutsya ubyvayaschej posledovatel'nost'yu\");\n getch();\n}\n\n\n\n************************************************************************\n\/\/ob'edinit' dva uporyadochennyh po vozrastaniyu massiva v odin, takzhe uporyadochennyj\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define n 50<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],b[n],c[2*n],i,j,t,k,ka=0,kb=0;<br \/>\n printf(&#171;Vvedite dva uporyadochennyh po vozrastaniyu massiva po %i elementov\\n\\nMassiv A:\\n&#187;,n);<br \/>\n for(i=0;i<n;i++)\n     {\n    printf(\"A[%i]> &#171;,i+1);<br \/>\n    scanf(&#171;%i&#187;,a[i]);<br \/>\n   }<br \/>\n printf(&#171;\\nMassiv B:\\n&#187;);<br \/>\n for(i=0;i<n;i++)\n     {\n    printf(\"B[%i]> &#171;,i+1);<br \/>\n    scanf(&#171;%i&#187;,&#038;b[i]);<br \/>\n   }<br \/>\n for(k=0;ka<n&#038;&#038;kb<n;k++)\n     if(a[ka]<b[kb])\n       {\n       c[k]=a[ka];\n       ka++;\n      }\n   else\n       {\n       c[k]=b[kb];\n       kb++;\n      }\n if(ka<=n)\n     for(i=kb;kb<n;i++)\n       {\n       c[k]=b[kb];\n       k++;\n       kb++;\n      }\n if(kb<=n)\n     for(i=ka;ka<n;i++)\n       {\n       c[k]=a[ka];\n       k++;\n       ka++;\n      }\n printf(\"\\tRezul'tat\\n\");\n for(i=0;i<n*2;i++)\n     printf(\"C[%i]=%i\",i+1,c[i]);     \n getch();\n}\n\n\n\n************************************************************************\n\/\/opredelit' kolichestvo chelovek, chej rost prevyshaet srednij\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n unsigned n,i,sum=0,k=0,a[size];<br \/>\n float sred;<br \/>\n printf(&#171;Skol&#8217;ko chelovek? &#171;);<br \/>\n scanf(&#171;%u&#187;,&#038;n);<br \/>\n for(i=0;i<n;i++)\n \t{\n    printf(\"%u.\",i+1);\n    scanf(\"%u\",a[i]);\n    s+=a[i];\n   }\n sred=(float)s\/n;\n for(i=0;i<n;i++)\n \tif(a[i]>sred)<br \/>\n   \tk++;<br \/>\n printf(&#171;Rost %u chelovek prevyshaet srednij&#187;,k);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/v massive natural&#8217;nyh chisel najti summu elementov, kratnyh K<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n unsigned i,k,a[size];<br \/>\n float s;<br \/>\n printf(&#171;Vvedite natural&#8217;noe chislo: &#171;);<br \/>\n scanf(&#171;%u&#187;,&#038;k);<br \/>\n printf(&#171;Vvedite massiv iz %u natural&#8217;nyh chisel:\\n&#187;,size);<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%u&#187;,&#038;a[i]);<br \/>\n\t if(a[i]%k==0)<br \/>\n\t\ts+=a[i];<br \/>\n\t}<br \/>\n printf(&#171;Summa chisel, kratnyh %u, ravna %f&#187;,k,s);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/v tselochislennoj posledovatel&#8217;nosti est&#8217; nulevye elementy<br \/>\n\/\/sozdat&#8217; massiv iz nomerov etih elementov<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define n 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],m,k,i=0;<br \/>\n for(k=0;k<n;k++)\n  {\n\tprintf(\"N%2i> &#171;,k+1);<br \/>\n\tscanf(&#171;%i&#187;,&#038;m);<br \/>\n\tif(m==0)<br \/>\n\t\t{<br \/>\n\t\t a[i]=k;<br \/>\n\t\t i++;<br \/>\n\t\t}<br \/>\n  }<br \/>\n printf(&#171;Nomera nulevyh elementov:\\n&#187;);<br \/>\n for(k=0;k<i;k++)\n\tprintf(\"%i\\n\",a[k]);\n getch();\n}\n\n\n\n************************************************************************\n\/\/vyyashit' kakoj element ('+' ili '-') vstrechaetsya ran'she\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float a[size];<br \/>\n int i;<br \/>\n for(i=0;i<size;i++)\n\tscanf(\"%f\",&#038;a[i]);\n for(i=0;i<size;i++)\n\tif(a[i]>0)<br \/>\n\t\t{<br \/>\n\t\t printf(&#171;+&#187;);<br \/>\n\t\t break;<br \/>\n\t\t}<br \/>\n\telse<br \/>\n\t\tif(a[i]<0)\n\t\t\t{\n          printf(\"-\");\n          break;\n         }\n getch();\n}\n\n\n\n************************************************************************\n\/\/najti kollichestvo polozhitel'nyh elementov v dejstvitel'nom massive\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 50<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float a[size];<br \/>\n unsigned i,k=0;<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%u]> &#171;,i+1);<br \/>\n\t scanf(&#171;%f&#187;,&#038;a[i]);<br \/>\n    if(a[i]>0)<br \/>\n    \tk++;<br \/>\n   }<br \/>\n printf(&#171;V dannom massive %u polozhitel&#8217;nyh chisel&#187;,k);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/ukazat&#8217; minimal&#8217;nyj otrezok chislovoj osi, soderzhaschij vse natural&#8217;nye chisla iz posledovatel&#8217;nosti<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 50<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n unsigned p[size],i,a=4294967625,b=0;<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"N%u> &#171;,i+1);<br \/>\n\t scanf(&#171;%u&#187;,&#038;p[i]);<br \/>\n\t if(p[i]<a)\n\t\ta=p[i];\n\t if(p[i]>b)<br \/>\n    \tb=p[i];<br \/>\n\t}<br \/>\n printf(&#171;Minimal&#8217;nyj otrezok: [%u;%u]&#187;,a,b);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/najti kolichestvo nulevyh elementov v massive tselyh chisel<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 20<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],i,n,k=0;<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t if(a[i]==0)<br \/>\n\t\tk++;<br \/>\n\t}<br \/>\n printf(&#171;V massive %i nulevyh elementov&#187;,k);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/zamenit&#8217; chisla, bol&#8217;she Z, etim chislom i podschitat&#8217; kolichestvo zamen<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 20<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float a[size],z;<br \/>\n unsigned i,k=0;<br \/>\n printf(&#171;Chislo Z: &#171;);<br \/>\n scanf(&#171;%f&#187;,&#038;z);<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%u]> &#171;,i+1);<br \/>\n\t scanf(&#171;%f&#187;,&#038;a[i]);<br \/>\n\t if(a[i]>z)<br \/>\n\t\t{<br \/>\n\t\t a[i]=z;<br \/>\n\t\t k++<br \/>\n\t\t}<br \/>\n\t}<br \/>\n printf(&#171;Rezul&#8217;tat:\\n&#187;);<br \/>\n for(i=0;i<size;i++)\n \tprinft(\"A[%u]=%.2f\\n\",i+1,a[i]);  \n getch();\n}\n\n\n\n************************************************************************\n\/\/najti kolichestvo chisel v posledovatel'nosti do edinstvennogo nulevogo elementa\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 20<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n unsigned a[size],i,k=0;<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%u]> &#171;,i+1);<br \/>\n\t scanf(&#171;%u&#187;,a[i]);<br \/>\n\t}<br \/>\n for(i=0;a[i]!=0&#038;&#038;i<size;i++)\n\tk++;\n if(k==size)\n \tprintf(\"Ne bylo nulevogo elementa\");\n else\n \tprintf(\"%u chisel do nulevogo elementa\",k);    \n getch();\n}\n\n\n\n************************************************************************\n\/\/podschitat' kolichestvo polozhitel'nyh, otritsatel'nyh i nulevyh elementov\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float a[size];<br \/>\n unsigned i,poz=0,neg=0,zero=0;<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%u]> &#171;,i+1);<br \/>\n\t scanf(&#171;%f&#187;,&#038;a[i]);<br \/>\n\t if(a[i]==0)<br \/>\n\t\tzero++;<br \/>\n\t else<br \/>\n\t\tif(a[i]>0)<br \/>\n\t\t\tpoz++;<br \/>\n\t\telse<br \/>\n\t\t\tneg++;<br \/>\n\t}<br \/>\n printf(&#171;\\n%u polozhitel&#8217;nyh, %u otritsatel&#8217;nyh, %u nulevyh elementov&#187;,poz,neg,zero);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/pomenyat&#8217; mestami maksimal&#8217;nyj i minimal&#8217;nyj elementy massiva<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],i,min=2147483647,max=-2147483648,indexmin,indexmax,t;<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t if(a[i]<min)\n\t\t{\n\t\t min=a[i];\n\t\t indexmin=i;\n\t\t}\n\t else\n\t\tif(a[i]>max)<br \/>\n\t\t\t{<br \/>\n\t\t\t max=a[i];<br \/>\n\t\t\t indexmax=i;<br \/>\n\t\t\t}<br \/>\n\t}<br \/>\n t=a[indexmin];<br \/>\n a[indexmin]=a[indexmax];<br \/>\n a[indexmax]=t;<br \/>\n printf(&#171;\\nRezul&#8217;tat:\\n&#187;);<br \/>\n for(i=0;i<size;i++)\n \tprintf(\"A[%i]=%i\\n\",i+1,a[i]);\n getch();\n}\n\n\n\n************************************************************************\n\/\/pomenyat' mestami sosednie elementy (ch`tnye s nech`tnymi)\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],i,t;<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=0;i<size;i+=2)\n\t{\n\t t=a[i];\n\t a[i]=a[i+1];\n\t a[i+1]=t;\n\t}\n printf(\"\\nRezul'tat:\\n\");\n for(i=0;i<size;i++)\n \tprintf(\"A[%i]=%i\\n\",i+1,a[i]);\n getch();\n}\n\n\n************************************************************************\n\/\/vyvetsi elemeny s indeksami 1,2,4,16,32,...\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 20<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],i,p=1;<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n printf(&#171;\\nRezul&#8217;tat:\\n&#187;);<br \/>\n for(i=1;i<size;i++)\n\tif(i==p)\n   \t{\n       printf(\"%i\\n\",a[i]);\n       p*=2;\n      }\n getch();\n}\n\n\n************************************************************************\n\/\/sformirovat' iz massiva, sostoyaschego iz nulej i edinits,\n\/\/dva massiva -  v odnom tol'ko nuli, v drugom tol'ko edinitsy\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 50<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],b[size],c[size],i,j=0,k=0;<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t if(a[i]==1)<br \/>\n\t\t{<br \/>\n\t\t b[j]=1;<br \/>\n\t\t j++;<br \/>\n\t\t}<br \/>\n\t else<br \/>\n\t\tif(a[i]==0)<br \/>\n\t\t\t{<br \/>\n\t\t\t c[k]=0;<br \/>\n\t\t\t k++;<br \/>\n\t\t\t}<br \/>\n\t\telse<br \/>\n\t\t\tprintf(&#171;Nevernyj vvod!\\n&#187;);<br \/>\n\t}<br \/>\n printf(&#171;\\nRezul&#8217;taty:\\n&#187;);<br \/>\n for(i=0;i<j;i++)\n\tprintf(\"B[%i]=%i\\n\",i+1,b[i]);\n for(i=0;i<k;i++)\n\tprintf(\"C[%i]=%i\\n\",i+1,c[i]);\n getch();\n}\n\n\n\n************************************************************************\n\/\/najti proizvedenie chisel, bol'shih M ili soobschit', chto takih net\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],m,i,f=0;<br \/>\n float p=1;<br \/>\n printf(&#171;Vvedite lyuboe tseloe chislo: &#171;);<br \/>\n scanf(&#171;%i&#187;,&#038;m);<br \/>\n printf(&#171;Vvedite %i tselyh chisel:\\n&#187;);<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t if(a[i]>m)<br \/>\n\t  {<br \/>\n\t\tp*=a[i];<br \/>\n\t\tf++;<br \/>\n\t  }<br \/>\n\t}<br \/>\n if(f)<br \/>\n \tprintf(&#171;Proizvedenie chisel bol&#8217;she %i ravno %.0f&#187;,m,p);<br \/>\n else<br \/>\n \tprintf(&#171;Net chisel bol&#8217;she %i&#187;,m);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/vyvesti te chisla, kotorye ne bol&#8217;she svoego indexa v massive<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n unsigned a[size],n,i;<br \/>\n for(i=0;i<size;i++)\n\t{\n    printf(\"A[%u]> &#171;,i);<br \/>\n    scanf(&#171;%u&#187;,&#038;a[i]);<br \/>\n   }<br \/>\n printf(&#171;\\nElementy, ne prevyshayuschie svoego indexa v massive\\n&#187;);<br \/>\n for(i=0;i<size;i++)\n \tif(a[i]<=i)\n   \tprintf(\"%u(A[%u])\\n\",a[i],i);\n getch();\n}\n\n\n************************************************************************\n\/\/vyvesti elementy, ostatok ot deleniya kotoryh na M raven L (0<=L<=M-1)\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n unsigned a[size],M,L,i;<br \/>\n printf(&#171;Vvedite natural&#8217;noe M: &#171;);<br \/>\n scanf(&#171;%u&#187;,&#038;M);<br \/>\n printf(&#171;Vvedite natural&#8217;noe L (0<=L<=M-1): \");\n scanf(\"%u\",&#038;L);\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%u]> &#171;,i+1);<br \/>\n\t scanf(&#171;%u&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n printf(&#171;\\nUdovletvoryayut usloviyu A[i]%%%u==%u:\\n&#187;,M,L);<br \/>\n for(i=0;i<size;i++)\n \tif(a[i]%M==L)\n   \tprintf(\"A[%u]=%u\\n\",i+1,a[i]);\n getch();\n}\n\n\n************************************************************************\n\/\/podschitat' kolichestvo dvoek v massive s otsenkami za ekzameny\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 50<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],i,k=0;<br \/>\n printf(&#171;Vvedite otsenki %i chelovek:\\n&#187;,size);<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"%3i> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n    if(a[i]==2)<br \/>\n    \tk++;<br \/>\n   }<br \/>\n printf(&#171;Ekzamen provalilo %i chelovek&#187;,k);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/vyvesti vse chisla do pervogo nulya<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],i,n;<br \/>\n for(i=0;i<size;i++)\n\tscanf(\"%i\",&#038;a[i]);\n printf(\"\\nRezul'tat:\\n\");\n for(i=0;i<size&#038;&#038;a[i]!=0;i++)\n   printf(\"%i\\n\",a[i]);\n getch();\n}\n\n\n\n************************************************************************\n\/\/raspechatat' znacgeniya argumenta i funktsii iz massiva\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 61<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float x,a[size];<br \/>\n int i=0;<br \/>\n for(x=-10;x<=10;x+=0.5)\n  {\n  \ta[i]=x;\n   a[i+1]=4*x*x+7*x+23;\n   i+=2;\n  }\n for(i=0;i<size;i+=2)\n \tprintf(\"x=%5.1f => y=%.2f\\n&#187;,a[i],a[i+1]);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/prigodnost&#8217; detali otsenivaetsya po razmeru B, kotoryj dolzhen sootvetstvovat&#8217; intervalu (A-C;A+C;)<br \/>\n\/\/esli v partii iz N detalej est&#8217; brakovannye detali, podschitat&#8217; ih<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 50<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int i,k=0;<br \/>\n float a,c,b[size];<br \/>\n printf(&#171;Vvedite razmery %i detalej:\\n&#187;,size);<br \/>\n for(i=0;i<size;i++)\n\tscanf(\"%f\",&#038;b[i]);\n printf(\"Vvedite standart razmera: \");\n scanf(\"%f\",&#038;a);\n printf(\"Vvedite dopustimuyu pogreshnost': \");\n scanf(\"%f\",&#038;c);\n for(i=0;i<size;i++)\n\tif(b[i]<a-c||b[i]>a+c)<br \/>\n\t\tk++;<br \/>\n if(k)<br \/>\n \tprintf(&#171;V partii %i brakovannyh detalej&#187;,k);<br \/>\n else<br \/>\n \tprintf(&#171;Vse detali prigodny&#187;);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/est&#8217; informatsii o soimosti kupli\/prodazhi v bankah goroda<br \/>\n\/\/opredelit&#8217;, v kakom banke vygodnee obmenyat&#8217; dollary na rubli<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int i,n,x=0;<br \/>\n float kurs[size],max;<br \/>\n printf(&#171;Vvedite kolichestvo bankov v gorode: &#171;);<br \/>\n scanf(&#171;%i&#187;,&#038;n);<br \/>\n printf(&#171;Vvedite kurs obmena v kazhdom iz bankov: &#171;);<br \/>\n for(i=0;i<n;i++)\n \t{\n    printf(\"%2i. \",i+1);\n    scanf(\"%f\",kurs[i]);\n\t}\n max=kurs[0];\n for(i=0;i<n;i++)\n\tif(kurs[i]>max)<br \/>\n\t\t{<br \/>\n\t\t max=kurs[i];<br \/>\n\t\t x=i+1;<br \/>\n      }<br \/>\n printf(&#171;Samyj vygodnyj kurs v banke N%i (%.3f)&#187;,x,max);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/najti summu maksimal&#8217;nogo iz nechetnyh i minimal&#8217;nogo iz chetnyh elementov<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],i,max,min;<br \/>\n printf(&#171;Vvedite %i tselyh chisel\\n&#187;,size);<br \/>\n for(i=1;i<size;i++)\n\tscanf(\"%i\",&#038;a[i]);\n min=a[0];\n max=a[1];\n for(i=1;i<size;i++)\n\tif(i%2==0)\n   \tif(a[i]<min)\n         min=a[i];\n   else\n   \tif(a[i]>max)<br \/>\n         max=a[i];<br \/>\n printf(&#171;Summa maksimal&#8217;nogo iz nechetnyh i minimalnogo iz chetnyh &#8212; %i&#187;,max+min);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/ukazat&#8217; te elementy posledovatel&#8217;nosti dejstvitel&#8217;nyh chisel,<br \/>\n\/\/kotorye prinadlezhat otrezku [c;d]<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><br \/>\n#include <stdlib.h><br \/>\n#include <time.h><\/p>\n<p>#define size 50<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n randomize();<br \/>\n float a[size],c,d;<br \/>\n int i;<br \/>\n for(i=0;i<size;i++)\n \t{\n    a[i]=(float)random(1000000)+(float)1\/random(1000000);\n    printf(\"%f\\n\",a[i]);\n   }\n printf(\"\\nVvedite granitsy otrezka [c;d]: \");\n scanf(\"%f%f\",&#038;c,&#038;d);\n printf(\"\\nOtrezku [%.2f;%.2f] v etoj posledovatel'nosti prinadlezhat:\\n\");\n for(i=0;i<size;i++)\n \tif(a[i]>=c&#038;&#038;a[i]<=d)\n   \tprintf(\"%f\\n\",a[i]);\n getch();\n}\n\n\n\n************************************************************************\n\/\/vychislit' proizvedenie polozhitel'nyh elementov i proizvedenie otritsatel'nyh\n\/\/sravnit' poluchennye proizvedeniya po modulyu\n\n#include <stdio.h><br \/>\n#include <conio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float a[size],pp=1,pn=1;<br \/>\n int i;<br \/>\n printf(&#171;Vvedite %i dejstvitel&#8217;nyh chisel\\n&#187;,size);<br \/>\n for(i=0;i<size;i++)\n\tscanf(\"%f\",&#038;a[i]);\n for(i=0;i<size;i++)\n\tif(a[i]<0)\n\t\tpn*=a[i];\n\telse\n\t\tpp*=a[i];\n if(pn<0)\n\tpn=-pn;\n if(pn>pp)<br \/>\n\tprintf(&#171;Proizvedenie polozhitel&#8217;nyh elementov bol&#8217;she proizvedeniya otritsatel&#8217;nyh&#187;);<br \/>\n else<br \/>\n \tprintf(&#171;Proizvedenie otritsatel&#8217;nyh chisel bol&#8217;she proizvedeniya polozhitel&#8217;nyh&#187;);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/v massive zadany koordinaty N tochek ploskosti (x1,y1,x2,y2,&#8230;,xn,yn)<br \/>\n\/\/opredelit&#8217; minimal&#8217;nyj radius kruga s tsentrom v nachale koordinat,<br \/>\n\/\/kotoryj soderzhit vse dannye tochki<\/p>\n<p>#include <stdio.h><br \/>\n#include <conio.h><br \/>\n#include <math.h><\/p>\n<p>#define size 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int i;<br \/>\n float a[size],r=0,t;<br \/>\n printf(&#171;Vvedite koordinaty (x;y) %i-i tochek\\n&#187;,size);<br \/>\n for(i=0;i<2*size;i+=2)\n\t{\n\t scanf(\"%f%f\",&#038;a[i],&#038;a[i+1]);\n    t=a[i]*a[i]+a[i+1]*a[i+1];\n    if(t>r)<br \/>\n    \tr=t;<br \/>\n   }<br \/>\n printf(&#171;Vse tochki soderzhit krug s radiusom %.2f&#187;,r);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/peremestit&#8217; vse otritsatel&#8217;nye elementy v nachalo massiva, ostal&#8217;nye v konets;<br \/>\n\/\/sohranit&#8217; pri etom poryadok sledovaniya, dopolnitel&#8217;nyj massiv ne zavodit&#8217;<\/p>\n<p>#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],i,p=0,j,n,t;<br \/>\n for(i=0;i<size;i++)\n\tscanf(\"%i\",&#038;a[i]);\n for(i=0;i<size;i++)\n\tif(a[i]<0)\n\t  {\n\t\tt=a[i];\n\t\ta[i]=a[p];\n\t\ta[p]=t;\n\t\tp++;\n\t  }\n printf(\"\\n Rezul'tat:\\n\");\n for(i=0;i<size;i++)\n\tprintf(\"%i\\n\",a[i]);\n getch();\n}\n\n\n************************************************************************\n\/\/sredi polozhitel'nyh chisel najti te, kororye\n\/\/yavlyayutsya kvadratami nekotorogo chisla M\n\n#include <conio.h><br \/>\n#include <math.h><br \/>\n#include <stdio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n unsigned i,a[size],m;<br \/>\n printf(&#171;Vvedite %i natural&#8217;nyh chisel:\\n&#187;);<br \/>\n for(i=0;i<size;i++)\n\tscanf(\"%u\",&#038;a[i]);\n printf(\"Vvedite natural'noe chislo: \");\n scanf(\"%u\",&#038;m);\n printf(\"Kvadratami chisla %u yavlyayutsya:\\n\");\n for(i=0;i<size;i++)\n\tif(m*m==a[i])\n\t\tprintf(\"%u\\n\",a[i]);\n getch();\n}\n\n\n\n************************************************************************\n\/\/Dan massiv natural'nyh chisel A. Obrazovat' massiv B, sostoyaschij\n\/\/iz teh elementov A, kotorye okanchivayutsya na tsifru K\n\n#include <conio.h><br \/>\n#include <stdio.h><br \/>\n#include <stdlib.h><br \/>\n#include <time.h><\/p>\n<p>#define size 50<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n randomize();<br \/>\n unsigned a[size],b[size],i,j=0,k;<br \/>\n printf(&#171;A:\\n&#187;);<br \/>\n for(i=0;i<size;i++)\n \t{\n    a[i]=random(1000000);\n    printf(\"%u\\n\",a[i]);\n\t}\n printf(\"Vvedite tsifru K: \");\n scanf(\"%u\",&#038;k);\n printf(\"B:\\n\");\n for(i=0;i<size;i++)\n\tif(a[i]%10==k)\n\t\t{\n\t\t b[j]=a[i];\n\t\t printf(\"%u\\n\",b[j]);\n\t\t j++;\n      }\n getch();\n}\n\n\n\n************************************************************************\n\/\/najti naibolee chasto vstrechayuscheesya chislo v mmassive\n\/\/esli takih chisel neskol'ko, to opredelit' naimen'shee iz nih\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 15<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],i,j,k,b[n],indB=0,count=0,min;<br \/>\n printf(&#171;Vvedite %i tselyh chisel\\n&#187;,n);<br \/>\n for(i=0;i<n;i++)\n\tscanf(\"%i\",&#038;a[i]);\n for(i=0;i<n;i++)\n\t{\n\t k=0;\n\t for(j=0;j<n;j++)\n\t\tif(a[j]==a[i])\n\t\t\tk++;\n\t if(k==count)\n\t\t{\n\t\t b[indB]=a[i];\n\t\t indB++;\n\t\t}\n\t else\n\t\tif(k>count)<br \/>\n\t\t\t{<br \/>\n\t\t\t b[0]=a[i];<br \/>\n\t\t\t count=k;<br \/>\n\t\t\t indB=1;<br \/>\n\t\t\t}<br \/>\n\t}<br \/>\n min=b[0];<br \/>\n for(i=0;i<indB;i++)\n\tif(b[i]<=min)\n\t\tmin=b[i];\n printf(\"\\nNaimen'shee iz naibolee chasto vstrechayuschihsya chisel - %i\",min);\t\t\n getch();\n}\n\n\n\n************************************************************************\n\/\/opredelit' vremya C prebyvaniya v ocheredi i-togo pokupatelya,\n\/\/esli vremya obsluzhivaniya i-togo pokupatelya ravno T[i]\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float a[n],c=0;<br \/>\n int i,k;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"%i-tyj pokupatel': \",i+1);\n\t scanf(\"%f\",&#038;a[i]);\n\t}\n printf(\"Nomer pokupatelya> &#171;);<br \/>\n scanf(&#171;%i&#187;,&#038;k);<br \/>\n for(i=0;i<n;i++)\n\tc+=a[i];\n printf(\"\\n%i-tyj pokupatel' prozhdet %.2f\",c);\t\n getch();\n}\n\n\n************************************************************************\n\/\/opredelit' kol'tso s tsentrom v nachale koordinat, soderzhaschee vse tochki, koordinaty kotoryh zadany v massive\n\n#include <conio.h><br \/>\n#include <math.h><br \/>\n#include <stdio.h><br \/>\n#include <values.h><\/p>\n<p>#define N 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float a[2*N],R=0,r=MAXFLOAT,t;<br \/>\n int i;<br \/>\n for(i=0;i<2*N;i+=2)\n\t{\n\t printf(\"Koordinaty tochki N%i: \");\n\t scanf(\"%f%f\",&#038;a[i],&#038;a[i+1]);\n\t t=a[i]*a[i]+a[i+1]*a[i+1];\n\t if(t>R)<br \/>\n\t\tR=t;<br \/>\n\t if(t<r)\n\t \tr=t;\n\t}\n printf(\"Vnutrennij radius kol'tsa - %.2f, vneshnij - %.2f\",sqrt(r),sqrt(R));\n getch();\n}\n\n\n\n************************************************************************\n\/\/zamenit' nulyami te chisla, velichina kotoryh po modulyu bol'she maksimal'nogo elementa\n\n#include <conio.h><br \/>\n#include <math.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],max,i;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n max=a[0];<br \/>\n for(i=1;i<n;i++)\n\tif(a[i]>max)<br \/>\n\t\tmax=a[i];<br \/>\n for(i=0;i<n;i++)\n\tif(abs(a[i])>max)<br \/>\n\t\ta[i]=0;<br \/>\n for(i=0;i<n;i++)\n \tprintf(\"\\nA[%i]=%i\",i+1,a[i]);\t\t\n getch();\n}\n\n\n\n************************************************************************\n\/\/najti i zamenit' nulem pervyj maksimal'nyj element massiva\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 15<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],i,p=0,max;<br \/>\n printf(&#171;Vvedite %i tselyh chisel\\n&#187;);<br \/>\n for(i=0;i<n;i++)\n\tscanf(\"%i\",&#038;a[i]);\n max=a[0];\n for(i=0;i<n;i++)\n\tif(a[i]>max)<br \/>\n\t\t{<br \/>\n\t\t max=a[i];<br \/>\n\t\t p=i;<br \/>\n\t\t}<br \/>\n a[p]=0;<br \/>\n for(i=0;i<n;i++)\n \tprintf(\"\\n%i\",a[i]);\t\t\n getch();\n}\n\n\n************************************************************************\n\/\/vstavit' chislo v neubyvayuschyuyu posledovatel'nost', sohraniv e` neubyvayuschej\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 15<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float a[n],b;<br \/>\n int i,k=0,t;<br \/>\n printf(&#171;Vvedite neubyvayuschyuyu posledovatel&#8217;nost&#8217; iz %i dejstvitel&#8217;nyh chisel\\n&#187;,n-1);<br \/>\n for(i=0;i<n-1;i++)\n\tscanf(\"%f\",&#038;a[i]);\n printf(\"Vvedite chislo: \");\n scanf(\"%f\",&#038;b);\n for(i=0;i<n&#038;&#038;b>a[i];i++)<br \/>\n\tk++;<br \/>\n for(i=n-1;i>k;i&#8212;)<br \/>\n\t{<br \/>\n\t t=a[i];<br \/>\n\t a[i]=a[i-1];<br \/>\n\t a[i-1]=t;<br \/>\n\t}<br \/>\n a[k]=b;<br \/>\n for(i=0;i<n;i++)\n \tprintf(\"\\n%.2f\",a[i]);\n getch();\n}\n\n\n\n************************************************************************\n\/\/zamenit' naimen'shij chlen posledovatel'nosti tseloj chast'yu srednego arifmeticheskogo ostal'nyh\n\/\/esli naimen'shih chlenov neskol'ko, to zamenit' poslednij po poryadku\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 15<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],i,sum,min,indexmin;<br \/>\n printf(&#171;Vvedite %i tselyh chisel\\n&#187;);<br \/>\n for(i=0;i<n;i++)\n\tscanf(\"%i\",&#038;a[i]);\n sum=0;\n min=a[0];\n for(i=0;i<n;i++)\n\t{\n\t sum+=a[i];\n\t if(a[i]<min)\n\t\t{\n\t\t indexmin=i;\n\t\t min=a[i];\n\t\t}\n\t}\n a[indexmin]=sum\/n;\n for(i=0;i<n;i++)\n \tprintf(\"\\n%i\",a[i]);\n getch();\n}\n\n\n\n************************************************************************\n\/\/esli a[i]<=0, uvelichit' b[i] v 10 raz, inache zamenit' b[i] nulem\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],b[n],i;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"B[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;b[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\tif(a[i]<=0)\n\t\tb[i]*=10;\n\telse\n\t\tb[i]=0;\n for(i=0;i<n;i++)\n \tprintf(\"B[%i]=%i\\n\",i+1,b[i]);\t\t\t\t\n getch();\n}\n\n\n************************************************************************\n\/\/umnozhit' vse otritsatelnye chleny posledovatel'nosti na kvadrat\n\/\/ee naibol'shego chlena, a polozhitel'nye - na kvadrat naimen'shego\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],i;<br \/>\n printf(&#171;Vvedite %i tselyh chisel&#187;,n);<br \/>\n for(i=0;i<n;i++)\n\tscanf(\"%i\");\n int min=a[0],max=a[0];\n for(i=0;i<n;i++)\n\t{\n\t if(a[i]>max)<br \/>\n\t\tmax=a[i];<br \/>\n\t if(a[i]<min)\n\t\tmin=a[i];\n\t}\n min*=min;\n max*=max;\n for(i=0;i<n;i++)\n\tif(a[i]<0)\n\t\ta[i]*=min;\n\telse\n\t\ta[i]*=max;\n for(i=0;i<n;i++)\n \tprintf(\"\\n%i\",a[i]);\t\t\t\t\n getch();\n}\n\n\n************************************************************************\n\/\/najti sredi n tochek ploskosti takie dve tochki, mezhdu kotorymi maksimal'noe rasstoyanie\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float x[n],y[n],r=0;<br \/>\n int i,j,A,B;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"Tochka M%i (x;y): \",i+1);\n\t scanf(\"%f%f\",&#038;x[n],&#038;y[n]);\n\t}\n for(i=0;i<n;i++)\n\tfor(j=0;j<n;j++)\n\t\tif((x[i]-x[j])*(x[i]-x[j])+(y[i]-y[j])*(y[i]-y[j])>r)<br \/>\n\t\t\t{<br \/>\n\t\t\t A=i;<br \/>\n\t\t\t B=j;<br \/>\n\t\t\t r=(x[i]-x[j])*(x[i]-x[j])+(y[i]-y[j])*(y[i]-y[j]);<br \/>\n\t\t\t}<br \/>\n printf(&#171;Naibol&#8217;shee rasstoyanie mezhdu tochkami M%i(%f;%f) i M%i(%f;%f)&#187;,A+1,x[A],y[A],B+1,x[B],y[B]);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/najti summu chlenov, raspolozhennyh mezhdu maksimal&#8217;nym i minimal&#8217;nym, vklyuchiv v summu oba etih chisla<\/p>\n<p>#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 15<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],i,indexmin=0,indexmax=0;<br \/>\n float s=0;<br \/>\n printf(&#171;Vvedite %i tselyh chisel\\n&#187;,n);<br \/>\n for(i=0;i<n;i++)\n\tscanf(\"%i\",&#038;a[i]);\n int min=a[0],max=a[0];\n for(i=0;i<n;i++)\n\t{\n\t if(a[i]>max)<br \/>\n\t\t{<br \/>\n\t\t max=a[i];<br \/>\n\t\t indexmax=i;<br \/>\n\t\t}<br \/>\n\t if(a[i]<min)\n\t\t{\n\t\t min=a[i];\n\t\t indexmin=i;\n\t\t}\n\t}\n if(indexmin<indexmax)\n\tfor(i=indexmax;i<indexmin;i++)\n\t\ts+=a[i];\n else\n\tfor(i=indexmin;i<indexmax;i++)\n\t\ts+=a[i];\n printf(\"\\nIskomaya summa ravna %.0f\",s);\t\t\t\t\n getch();\n}\n\n\n\n************************************************************************\n\/\/najdya v massive tselyh chisel minimal'nyj element m i maksimal'nyj M,\n\/\/poluchit' v poryadke vozrastaniya vse tselye chisla iz intervala (m;M),\n\/\/kotorye ne vhodyat v etot massiv\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 15<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],i,j;<br \/>\n for(i=0;i<n;i++)\n\tscanf(\"%i\",&#038;a[i]);\n int m=a[0],M=a[0];\n for(i=0;i<n;i++)\n\t{\n\t if(a[i]>M)<br \/>\n\t\tM=a[i];<br \/>\n\t if(a[i]<m)\n\t\tm=a[i];\n\t}\n for(i=m+1;i<M;i++)\n\t{\n\t int f=1;\n\t for(j=0;j<n;j++)\n\t\tif(a[j]==i)\n\t\t\tf=0;\n\t if(f)\n\t \tprintf(\"\\n%i\",i);\t\t\n\t}\n getch();\n}\n\n\n************************************************************************\n\/\/poluchit' novyj massiv deleniem kazhdogo elementa ishodnogo na ego maksimal'nyj element\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 15<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float a[n],b[n];<br \/>\n int i;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%f&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n float max=a[0];<br \/>\n for(i=0;i<n;i++)\n\tif(a[i]>max)<br \/>\n\t\tmax=a[i];<br \/>\n for(i=0;i<n;i++)\n\tb[i]=a[i]\/max;\n for(i=0;i<n;i++)\n\tprintf(\"\\nB[%i]=%.3f\",i+1,b[i]);\n getch();\n}\n\n\n\n************************************************************************\n\/\/kazhdyj solnechnyj den' ulitka podnimaetsya na 2 sm po derevu,\n\/\/a kahdyj pasmurnyj - spuskaetsya na 1 sm\n\/\/v nachale nablyudeniya ulitka sidela v A sm ot zemli na B-santimetrovom dereve\n\/\/imeya massiv so svedeniyami o pogode, opredelit' polozhenie ulitki v lyuboj den'\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 20<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],i,A,B,N;<br \/>\n printf(&#171;\\tUlitka na dereve\\nVvedite svedeniya o pogode za %i dnej\\nVvedite 0, esli byl solnechnyj den&#8217;, vvedite 1, esli byl pasmurnyj den'&#187;,n);<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"Den' %i: \",i+1);\n\t scanf(\"%i\",&#038;a[i]);\n\t}\n printf(\"Vvedite vysotu dereva: \");\n scanf(\"%i\",&#038;B);\n printf(\"Vvedite nachal'noe polozhenie ulitki: \");\n scanf(\"%i\",&#038;A);\n printf(\"Vvedite nomer dnya: \");\n scanf(\"%i\",&#038;N);\n for(i=0;i<n&#038;&#038;A<B;i++)\n\tif(a[i])\n\t\tA++;\n\telse\n\t\tA+=2;\n if(A>B)<br \/>\n\tprintf(&#171;Za %i dnej ulitka upolzet s dereva&#187;,N);<br \/>\n else<br \/>\n \tprintf(&#171;Za %i dnej ulitka budet na vysote %i sm&#187;,N,A);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/vybrosit&#8217; iz ishodnoj posledovatel&#8217;nosti te chleny, kotorye ravny minimal&#8217;nomu elementu<\/p>\n<p>#include <conio.h><br \/>\n#include <stdio.h><br \/>\n#include <values.h><\/p>\n<p>#define n 15<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],b[n],i,j=0,min=MAXINT;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t if(a[i]<min)\n\t\tmin=a[i];\n\t}\n for(i=0;i<n;i++)\n\tif(a[i]!=min)\n\t\t{\n\t\t b[j]=a[i];\n\t\t j++;\n\t\t}\n for(i=0;i<n;i++)\n \tprintf(\"B[%i]=%i\\n\",i+1,b[i]);\n getch();\n}\n\n\n************************************************************************\n\/\/vybrosit' iz tselochislennogo massiva kazhdyj vtoroj element\n\/\/dopolnitel'nyj massiv me ispol'zovat'\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],i,k=0;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"a[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\tif(i%2==0)\n\t\t{\n\t\t a[k]=a[i];\n\t\t k++;\n\t\t}\n for(i=0;i<k;i++)\n\tprintf(\"a[%i]=%i\\n\",i+1,a[i]);\n getch();\n}\n\n\n\n************************************************************************\n\/\/szhat' massiv, vybrosiv iz nego nulevye elementy\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],i,k=0;<br \/>\n for(i=0;i<n;i++)\n\tscanf(\"%i\",&#038;a[i]);\n for(i=0;i<n;i++)\n\tif(a[i])\n\t\t{\n\t\t a[k]=a[i];\n\t\t k++;\n\t\t}\n for(i=0;i<k;i++)\n\tprintf(\"\\n%i\",a[i]);\n getch();\n}\n\n\n\n\n************************************************************************\n\/\/v odin massiv pomestit' elementy ishodnogo s chetnymi nomerami, v drugoj - s nechetnymi\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int A[n],B[n\/2+1],C[n\/2+1],i,iB=0,iC=0;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i);<br \/>\n\t scanf(&#171;%i&#187;,&#038;A[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\tif(i%2)\n\t\t{\n\t\t B[iB]=A[i];\n\t\t iB++;\n\t\t}\n\telse\n\t\t{\n\t\t C[iC]=A[i];\n\t\t iC++;\n\t\t}\n for(i=0;i<iB;i++)\n\tprintf(\"\\nB[%i]=%i\",i,B[i]);\n for(i=0;i<iC;i++)\n   printf(\"\\nC[%i]=%i\",i,C[i]);\n getch();\n}\n\n\n************************************************************************\n\/\/najti v massive dva chlena, srednee arifmeticheskoe kotoryh blizhe vsego k dejstvitel'nomu X\n\n#include <conio.h><br \/>\n#include <math.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float a[n],x,d;<br \/>\n int i,j,k1,k2;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%f&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n printf(&#171;Vvedite dejstvitel&#8217;noe chislo: &#171;);<br \/>\n scanf(&#171;%f&#187;,&#038;x);<br \/>\n d=x;<br \/>\n for(i=0;i<n;i++)\n\tfor(j=0;j<n;j++)\n\t  if(i!=j)\n\t\tif(abs((a[i]+a[j])\/2-x)<d)\n\t\t\t{\n\t\t\t d=abs((a[i]+a[j])\/2-x);\n\t\t\t k1=i;\n\t\t\t k2=j;\n\t\t\t}\n printf(\"Nomera iskomyh elementov - %i i %i\",k1,k2);\n getch();\n}\n\n\n************************************************************************\n\/\/proverit', vhodyat li vse chleny pervoj posloedovatel'nosti vo vtoruyu\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<br \/>\n#define m 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],b[m],f[n],i,j,k=0;<br \/>\n printf(&#171;Vhodyat li vse chleny posledovatel&#8217;nosti A v posledovatel&#8217;nost&#8217; B\\n&#187;);<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(j=0;j<m;j++)\n\t{\n\t printf(\"B[%i]> &#171;,j+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;b[j]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\tfor(j=0;j<n;j++)\n\t\tif(a[i]==b[j])\n\t\t\tf[i]=1;\n for(i=0;i<n;i++)\n\tif(a[i])\n\t\tk++;\n if(k==n)\n\tprintf(\"Otvet: da\");\n else\n \tprintf(\"Otvet: net\");\t\n getch();\n}\n\n\n************************************************************************\n\/\/podschitat' kolichestvo chelovek, chej vozrast v predelah 0..10, 10..20 i t.d.\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 15<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n unsigned a[n],i,k0,k1,k2,k3,k4,k5,k6,k7,k8,k9,d;<br \/>\n printf(&#171;Vvedite vozrast %i chelovek\\n&#187;,n);<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"N%u> &#171;,i+1);<br \/>\n\t scanf(&#171;%u&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\t if(a[i]<11)\n\t\tk0++;\n\t else\n\t\tif(a[i]<21)\n\t\t\tk1++;\n\t\telse\n\t\t\tif(a[i]<31)\n\t\t\t\tk2++;\n\t\t\telse\n\t\t\t\tif(a[i]<41)\n\t\t\t\t\tk3++;\n\t\t\t\telse\n\t\t\t\t\tif(a[i]<51)\n\t\t\t\t\t\tk4++;\n\t\t\t\t\telse\n\t\t\t\t\t\tif(a[i]<61)\n\t\t\t\t\t\t\tk5++;\n\t\t\t\t\t\telse\n\t\t\t\t\t\t\tif(a[i]<71)\n\t\t\t\t\t\t\t\tk6++;\n\t\t\t\t\t\t\telse\n\t\t\t\t\t\t\t\tif(a[i]<81)\n\t\t\t\t\t\t\t\t\tk7++;\n\t\t\t\t\t\t\t\telse\n\t\t\t\t\t\t\t\t\tif(a[i]<91)\n\t\t\t\t\t\t\t\t\t\tk8++;\n\t\t\t\t\t\t\t\t\telse\n\t\t\t\t\t\t\t\t\t\tif(a[i]<101)\n\t\t\t\t\t\t\t\t\t\t\tk9++;\n\t\t\t\t\t\t\t\t\t\telse\n\t\t\t\t\t\t\t\t\t\t\td++;\n printf(\"\\n0-10 let - %u chelovek,\\n10-20 let - %u chelovek,\\n20-30 let - %u chelovek,\\n30-40 let - %u chelovek,\\n\",k0,k1,k2,k3);\n printf(\"\\n40-50 let - %u chelovek,\\n50-60 let - %u chelovek,\\n60-70 let - %u chelovek,\",k4,k5,k6);\n printf(\"\\n70-80 let - %u chelovek,\\n80-90 let - %u chelovek,\\n90-100 let - %u chelovek,\\n%u chelovek - dolgozhiteli (>100 let)&#187;,k7,k8,k9,d);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/vyvesti nomera elementov, kotorye yavlyayutsya prostymi chislami<\/p>\n<p>#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 15<\/p>\n<p>int prost(unsigned a)<\/p>\n<p>{<br \/>\n for(int i=2;i<a\/2;i++)\n\tif(a%i==0)\n\t\treturn 0;\n return 1;\n}\n\n\nvoid main()\n\n{\n clrscr();\n unsigned a[n],i;\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%u]> &#171;,i+1);<br \/>\n\t scanf(&#171;%u&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\tif(prost(a[i]))\n\t\tprintf(\"\\nN%-3u (%u)\",i+1,a[i]);\n getch();\n}\n\n\n\n************************************************************************\n\/\/najti kolichestvo razlichnyh chisel v posledovatel'nosti\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],i,j,k=0,f;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\t{\n\t f=1;\n\t for(j=i+1;j<n;j++)\n\t\tif(a[i]==a[j])\n\t\t\tf=0;\n\t if(f)\n\t\tk++;\n\t}\n printf(\"\\nRazlichnyh chisel sredi elementov massiva - %i\",k);\t\n getch();\n}\n\n\n\n************************************************************************\n\/\/vyvesti te elementy, summa dvuh pervyh tsifr kotoryh ravna summe dvuh poslednih\n\n#include <conio.h><br \/>\n#include <stdio.h><br \/>\n#include <stdlib.h><br \/>\n#include <time.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n randomize();<br \/>\n int a[n],i,k=0;<br \/>\n printf(&#171;\\tIshodnyj massiv\\n&#187;);<br \/>\n for(i=0;i<n;i++)\n\t{\n\t a[i]=random(9000)+1000;\n\t printf(\"A[%i]=%i\\n\",i+1,a[i]);\n\t}\n printf(\"Ukazannomu usloviyu udovletvoryayut:\\n\");\n for(i=0;i<n;i++)\n\tif((a[i]\/1000+a[i]%1000\/100)==(a[i]%100\/10+a[i]%10))\n\t\t{\n\t\t printf(\"A[%i]=%i\\n\",i+1,a[i]);\n\t\t k++;\n\t\t}\n printf(\"Vsego - %i takih elementov\");\t\t\n getch();\n}\n\n\n\n************************************************************************\n\/\/najti, skol'ko chlenov odnoj posledovatel'nosti sovpadayut s chlenami drugoj\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],b[n],i,k=0;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"B[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;b[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\tif(a[i]==b[i])\n\t\tk++;\n printf(\"%i chisel sovpadayut\",k);\t\t\n getch();\n}\n\n\n\n************************************************************************\n\/\/sozdat' massiv iz razlichnyh elementov tselochislennogo massiva\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int A[n],B[n],i,b=0,j,f;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;A[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\t{\n\t B[b]=A[i];\n\t f=1;\n\t for(j=0;j<n;j++)\n\t\tif(A[i]==A[j]&#038;&#038;(i!=j))\n\t\t\tf=0;\n\t if(f)\n\t\tb++;\n\t}\n for(i=0;i<b;i++)\n   printf(\"\\nB[%i]=%i\",i+1,B[i]);\n getch();\n}\n\n\n************************************************************************\n\/\/v massive a[2*n] zapisany koordinaty n tochek ploskosti\n\/\/najti nomera naimenee i naibolee udalennyh drug ot druga tochek\n\n#include <conio.h><br \/>\n#include <stdio.h><br \/>\n#include <values.h><\/p>\n<p>#define n 5<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float a[2*n],d,r=MAXFLOAT,R=0;<br \/>\n int i,j,M1,M2,N1,N2;<br \/>\n for(i=0;i<2*n;i+=2)\n\t{\n\t printf(\"Tochka A%i (x;y): \",i\/2+1);\n\t scanf(\"%f%f\",&#038;a[i],&#038;a[i+1]);\n\t}\n for(i=0;i<2*n;i+=2)\n\tfor(j=0;j<n;j++)\n     if(i!=j)\n\t\t{\n\t\t d=(a[i]-a[j])*(a[i]-a[j])+(a[i+1]-a[j+1])*(a[i+1]-a[j+1]);\n\t\t if(d<r)\n\t\t\t{\n\t\t\t r=d;\n\t\t\t M1=i\/2+1;\n\t\t\t M2=j\/2+1;\n\t\t\t}\n\t\t if(d>R)<br \/>\n\t\t\t{<br \/>\n\t\t\t R=d;<br \/>\n\t\t\t N1=i\/2+1;<br \/>\n\t\t\t N2=j\/2+1;<br \/>\n\t\t\t}<br \/>\n\t\t}<br \/>\n printf(&#171;Naimenee udalennye tochki: A%i i A%i\\nNaibolee udalennye tochki: A%i i A%i&#187;,M1,M2,N1,N2);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/raspolozhit&#8217; elementy zadannogo massiva v obratnom poryadke<\/p>\n<p>#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],b[n],i,j=0;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=n-1;i>=0;i&#8212;)<br \/>\n\t{<br \/>\n\t b[j]=a[i];<br \/>\n\t j++;<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\tprintf(\"A[%i]=%i\\n\",i+1,b[i]);\n getch();\n}\n\n\n************************************************************************\n\/\/ob'edinit' v massive C[n+m] dva massiva A[n] i B[m]\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<br \/>\n#define m 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],b[m],c[n+m],i,j=n;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=0;i<m;i++)\n\t{\n\t printf(\"B[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;b[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\tc[i]=a[i];\n for(i=0;i<m;i++)\n\t{\n\t c[j]=b[i];\n\t j++;\n\t}\n for(i=0;i<n+m;i++)\n \tprintf(\"\\nC[%i]=%i\",i+1,c[i]);\t\n getch();\n}\n\n\n\n************************************************************************\n\/\/zamenit' i-tyj element massiva minimal'nym sredi pervyh i elementov\n\n#include <conio.h><br \/>\n#include <stdio.h><br \/>\n#include <stdlib.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],i,j,m;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\t{\n\t m=a[i];\n\t for(j=0;j<i;j++)\n\t\tm=min(m,a[j]);\n    a[i]=m;\n\t}\n for(i=0;i<n;i++)\n   printf(\"\\nA[%i]=%i\",i+1,a[i]);\n getch();\n}\n\n\n************************************************************************\n\/\/pomestit' vse ch`tnye elementy massiva v odin massiv, a nech`tnye - v drugoj, podschitav kolichestvo teh i drugih\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 20<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],b[n],c[n],i,j,k;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\tif(i%2==0)\n\t\t{\n\t\t b[j]=a[i];\n\t\t j++;\n\t\t}\n\telse\n\t\t{\n\t\t c[k]=a[i];\n\t\t k++;\n\t\t}\n printf(\"\\nRezul'tat: %i chetnyh i %i nechetnyh\\n\",j,k);\n for(i=0;i<j;i++)\n\tprintf(\"B[%i]=%i\\n\",i,b[i]);\n for(i=0;i<n;i++)\n\tprintf(\"C[%i]=%i\\n\",i,c[i]);\n getch();\n}\n\n\n\n************************************************************************\n\/\/vyvesti nomera lokal'nyh maksimumov (a[i-1]<a[i]>a[i+1])<\/p>\n<p>#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],i;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n printf(&#171;\\nIndexy lokal&#8217;nyh maksimumov:&#187;);<br \/>\n for(i=1;i<n-1;i++)\n\tif(a[i-1]<a[i]&#038;&#038;a[i]>a[i+1])<br \/>\n\t\tprintf(&#171;\\n%i&#187;,i+1);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/zamenit&#8217; summoj predyduschih elementov vse elementy, krome pervogo<\/p>\n<p>#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float a[n],b[n],s;<br \/>\n int i=0;<br \/>\n for(;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%f&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n s=a[1];<br \/>\n for(i=1;i<n;i++)\n\t{\n\t b[i]=s;\n\t s+=a[i];\n\t}\n for(i=0;i<n;i++)\n \tprintf(\"\\nA[%i]=%.3f\",i+1,a[i]);\t\n getch();\n}\n\n\n************************************************************************\n\/\/zamenit' kazhdyj i-tyj element srednim znacheniem sredi pervyh i elementov\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int i,j;<br \/>\n float a[n],b[n],s;<br \/>\n for(i=0;i<n;i++)\n\tscanf(\"%f\",&#038;a[i]);\n b[0]=a[0];\n for(i=1;i<n;i++)\n\t{\n\t s=0;\n\t for(j=0;j<=i;j++)\n\t\ts+=a[j];\n\t b[i]=s\/(float)i;\n\t}\n for(i=0;i<n;i++)\n\tprintf(\"\\n%.2f\",b[i]);\n getch();\n}\n\n\n\n************************************************************************\n\/\/pomestit' naimen'shij element na pervoe mesto, naimen'shij iz ostavshihsya - na vtoroe i t.d.\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 15<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int A[n],i,min,indmin,a=0,b=n-1,tmp;<br \/>\n for(i=0;i<n;i++)\n\tscanf(\"%i\",&#038;A[i]);\n while(a!=b)\n\t{\n\t min=A[a];\n\t for(i=a+1;i<b;i++)\n\t\tif(A[i]<min)\n\t\t\t{\n\t\t\t min=A[i];\n\t\t\t indmin=i;\n\t\t\t}\n\t tmp=A[a];\n\t A[a]=A[indmin];\n\t A[indmin]=tmp;\n\t a++;\n\t min=A[b];\n\t for(i=a+1;i<b;i++)\n\t\tif(A[i]<min)\n\t\t\t{\n\t\t\t min=A[i];\n\t\t\t indmin=i;\n\t\t\t}\n\t tmp=A[a];\n\t A[a]=A[indmin];\n\t A[indmin]=tmp;\n\t b--;\n\t}\n for(i=0;i<n;i++)\n\tprintf(\"\\n%i\",A[i]);\n getch();\n}\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n\n************************************************************************\n\/\/poluchit' novyj massiv umnozheniem kazhdogo elementa ishodnogo na maksimal'nyj\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],max,i,b[n];<br \/>\n for(i=0;i<n;i++)\n\tscanf(\"%i\",&#038;a[i]);\n max=a[0];\n for(i=1;i<n;i++)\n\tif(a[i]>max)<br \/>\n\t\tmax=a[i];<br \/>\n for(i=0;i<n;i++)\n\t{\n\t b[i]=a[i]*max;\n\t printf(\"\\n%i\",b[i]);\n\t}\n getch();\n}\n\n\n\n************************************************************************\n\/\/najti v massive pervyj i poslednij nulevye elementy\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],i,x,y;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(x=0;a[x];x++);<br \/>\n for(y=n-1;a[y];y&#8212;);<br \/>\n printf(&#171;Pervyj nulevoj &#8212; A[%i], poslednij &#8212; A[%i]&#187;,x+1,y+1);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/kazhdyj tretij element zamenit&#8217; udvoennym proizvedeniem dvuh predyduschih,<br \/>\n\/\/a stoyaschij pered nim &#8212; polusummoj sosednih s nim;<br \/>\n\/\/dopolnitel&#8217;nyj massiv ne ispol&#8217;zovat&#8217;<\/p>\n<p>#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 15<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],i,t1,t2,t3;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i+=3)\n\t{\n\t t1=a[i];\n\t t2=a[i+1];\n\t t3=a[i+2];\n\t if(i+2<n)\n\t\ta[i+2]=t1+t2;\n\t if(i+1<n)\n\t\ta[i+1]=t1+t3;\n\t}\n for(i=0;i<n;i++)\n \tprintf(\"\\nA[%i]=%i\",i+1,a[i]);\t\n getch();\n}\n\n\n\n************************************************************************\n\/\/najti v massive nomera srednestatisticheskogo i unikal'nogo elementov\n\n#include <conio.h><br \/>\n#include <math.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float a[n],sred=0,max,min;<br \/>\n int i,stat,unik;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%f&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\tsred+=a[i];\n sred\/=(float)n;\n for(i=0;i<n;i++)\n\t if(abs(a[i]-sred)<min)\n\t\tstat=i+1;\n\t else\n\t\tif(abs(a[i]-sred)>max)<br \/>\n\t\t\tunik=i+1;<br \/>\n printf(&#171;\\nSrednestaticheskij &#8212; A[%i]=%.2f\\nUnikal&#8217;nyj &#8212; A[%i]=%.2f&#187;,stat,a[stat],unik,a[unik]);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/najti naibol&#8217;shij element massiva K[n], ne imeyuschij sebe ravnyh v massive N[m]<\/p>\n<p>#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<br \/>\n#define m 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int K[n],N[m],i,j,max,f,X=0;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"K[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;K[i]);<br \/>\n\t}<br \/>\n for(j=0;j<n;j++)\n\t{\n\t printf(\"N[%i]> &#171;,j+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;N[j]);<br \/>\n\t}<br \/>\n max=K[0];<br \/>\n for(i=0;i<n;i++)\n\tif(K[i]>max)<br \/>\n\t\t{<br \/>\n\t\t f=1;<br \/>\n\t\t for(j=0;j<n;j++)\n\t\t\tif(K[i]==N[j])\n\t\t\t\tf=0;\n\t\t if(f)\n\t\t\t{\n\t\t\t max=K[i];\n\t\t\t X=i;\n\t\t\t}\n\t\t}\n printf(\"\\nIskomyj element - K[%i]=%i\",X+1,K[X]);\n getch();\n}\n\n\n\n************************************************************************\n\/\/najti v massive samuyu dlinnuyu monotonno vozrastayuschyuyu posledovatel'nost'\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 15<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int A[n],i,j,k,K=0,a;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;A[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\t{\n\t k=0;\n\t for(j=i+1;A[j]>=A[j-1]&#038;&#038;j<n;j++)\n\t\tk++;\n\t if(k>K)<br \/>\n\t\t{<br \/>\n\t\t K=k+1;<br \/>\n\t\t a=i+1;<br \/>\n\t\t}<br \/>\n\t}<br \/>\n printf(&#171;\\nNachalo posledovatel&#8217;nosti: A[%i], dlina &#8212; %i&#187;,a,K);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/najti vse chisla, vstrechayuschiesya v massive rovno dva raza<\/p>\n<p>#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],i,j,k;<br \/>\n for(i=0;i<n;i++)\n\tscanf(\"%i\",&#038;a[i]);\n for(i=0;i<n;i++)\n\t{\n\t k=0;\n\t for(j=0;j<n;j++)\n\t\tif(a[i]==a[j])\n\t\t\tk++;\n\t if(k==2)\n\t\tprintf(\"\\n%i\",a[i]);\n\t}\n getch();\n}\n\n\n************************************************************************\n\/\/poluchit' novyj massiv deleniem kazhdogo elementa ishodnogo na minimal'nyj element\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 10<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float a[n],min,b[n];<br \/>\n int i;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%f&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n min=a[0];<br \/>\n for(i=0;i<n;i++)\n\tif(a[i]<min)\n\t\tmin=a[i];\n for(i=0;i<n;i++)\n\t{\n\t b[i]=a[i]\/min;\n\t printf(\"\\nB[%i]=%.2f\",i+1,b[i]);\n\t}\n getch();\n}\n\n\n************************************************************************\n\/\/najti v massive samuyu dlinnuyu posledovatel'nost', yavlyayuschyuyusya arifmeticheskoj ili geometricheskoj progressiej\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 15<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n float a[n],q;<br \/>\n int i,j,k,A,G,arifm,geom;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=1;i<n;i++)\n\t{\n\t q=a[i]-a[i-1];\n\t k=2;\n\t for(j=i+1;(a[j]-a[j-1]==q)&#038;&#038;j<n;j++)\n\t\tk++;\n\t if(k>arifm)<br \/>\n\t\t{<br \/>\n\t\t arifm=k;<br \/>\n\t\t A=i;<br \/>\n\t\t}<br \/>\n\t}<br \/>\n printf(&#171;\\nSamaya dlinnaya arifmeticheskaya progressiya &#8212; nachalo: A[%i], dlina: %i&#187;,A,arifm);<br \/>\n for(i=1;i<n;i++)\n\t{\n\t q=a[i]\/a[i-1];\n\t k=2;\n\t for(j=i+1;(a[j]\/a[j-1]==q)&#038;&#038;j<n;j++)\n\t\tk++;\n\t if(k>geom)<br \/>\n\t\t{<br \/>\n\t\t geom=k;<br \/>\n\t\t G=i;<br \/>\n\t\t}<br \/>\n\t}<br \/>\n printf(&#171;Samaya dlinnaya geometricheskaya progressiya &#8212; nachalo: A[%i], dlina: %i&#187;,G,geom);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/v massive neotritsatel&#8217;nyh chisel najti indeks elementa, dlya kotorogo summa<br \/>\n\/\/stoyaschih pered nim elementov naimenee otlichaetsya ot summy stoyaschih posle nego<\/p>\n<p>#include <conio.h><br \/>\n#include <math.h><br \/>\n#include <stdio.h><br \/>\n#include <values.h><\/p>\n<p>#define n 15<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],i,j,Index;<br \/>\n float s1,s2,D=MAXFLOAT;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i+1);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n;i++)\n\t{\n\t s1=0;\n\t s2=0;\n\t for(j=0;j<i;j++)\n\t\ts1+=a[j];\n\t for(j=i+1;j<n;j++)\n\t\ts2+=a[j];\n\t if(abs(s1-s2)<D)\n\t\t{\n\t\t Index=i;\n\t\t D=abs(s1-s2);\n\t\t}\n\t}\n printf(\"\\nA[%i]= - iskomyj element\",Index+1,);\n getch();\n}\n\n\n\n************************************************************************\n\/\/chisliteli i znamenateli drobej zadany dvumya tselochislennymi massivami\n\/\/najti naibol'shuyu drob', zadannuyu etimi massivami\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 50<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],b[n],i,p;<br \/>\n float m=-1e37;<br \/>\n printf(&#171;Vvedite chisliteli i znamenateli %i drobej\\n&#187;,n);<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"N%i> &#171;,i+1);<br \/>\n\t scanf(&#171;%i%i&#187;,&#038;a[i],&#038;b[i]);<br \/>\n\t if(((float)a[i]\/b[i])>m)<br \/>\n\t\t{<br \/>\n\t\t m=(float)a[i]\/b[i];<br \/>\n       p=i;<br \/>\n\t\t}<br \/>\n\t}<br \/>\n printf(&#171;Naibol&#8217;shaya drob&#8217; &#8212; N%i (%.3f)&#187;,p,m);<br \/>\n getch();<br \/>\n}<\/p>\n<p>************************************************************************<br \/>\n\/\/v neuporyadochennom massive est&#8217; sovpadayuschie elementy<br \/>\n\/\/ostavit&#8217; tol&#8217;ko odin iz kazhdoj gruppy sovpadayuschih elementov<\/p>\n<p>#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],b[size],i,j,k=0,f;<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=0;i<size;i++)\n\t{\n\t f=1;\n\t for(j=0;j<size;j++)\n\t\tif(a[i]==b[j])\n\t\t\tf=0;\n\t if(f)\n\t\t{\n\t\t b[k]=a[i];\n\t\t k++;\n\t\t}\n\t}\n printf(\"\\nRezul'tat\\n\");\n for(i=0;i<k;i++)\n \tprintf(\"A[%i]=%i\\n\",i,b[i]);\t\n getch();\n}\n\n\n************************************************************************\n\/\/preobrazovat' uporyadochennyj po nevozrastaniyu massiv v uporyadochennyj po vozrastaniyu,\n\/\/ostaviv tol'ko odin v kazhdoj gruppe sovpadayuschih elementov\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define n 20<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[n],b[n],i,k=0;<br \/>\n for(i=0;i<n;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=0;i<n-1;i++)\n\tif(a[i]!=a[i+1])\n\t\t{\n\t\t b[k]=a[i];\n\t\t k++;\n\t\t}\n if(a[i+1]!=b[k-1])\n\t{\n\t b[k]=a[i];\n\t k++;\n\t}\n for(i=0;i<k;i++)\n\tprintf(\"\\nB[%i]=%i\",i,b[i]);\n getch();\n}\n\n\n\n************************************************************************\n\/\/dany dva uporyadochennyh po ubyvaniyu massiva W[n] i G[m]\n\/\/poluchit' iz nih uporyadochennyj po ubyvaniyu massiv C\n\/\/sovpadayuschie elementy vstavlyat' edinozhdy\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int W[size],G[size],C[size*2],n,m,indW,indG,indC;<br \/>\n printf(&#171;\\nW[n]\\nVvedite kolichestvo elementov: &#171;);<br \/>\n scanf(&#171;%i&#187;,&#038;n);<br \/>\n for(indW=0;indW<n;indW++)\n \t{\n    printf(\"W[%i]> &#171;,indW);<br \/>\n    scanf(&#171;%i&#187;,&#038;W[indW]);<br \/>\n   }<br \/>\n printf(&#171;\\nG[m]\\nVvedite kolichestvo elementov: &#171;);<br \/>\n scanf(&#171;%i&#187;,&#038;m);<br \/>\n for(indG=0;indG<m;indG++)\n \t{\n    printf(\"G[%i]> &#171;,indG);<br \/>\n    scanf(&#171;%i&#187;,&#038;G[indG]);<br \/>\n   }<br \/>\n indW=0;<br \/>\n indG=0;<br \/>\n for(indC=0;indW<n&#038;&#038;indG<m;indC++)\n\t{\n\t \n\t}\n printf(\"\\nC[%i]:\\n\",indC);\n for(i=0;i<indC;i++)\n \tprintf(\"C[%i]=%i\",i,c[i]);\t  \n getch();\n}\n\n\n\n************************************************************************\n\/\/vosstanovit' ishodnoe sostoyanie massiva A s elementami, peremeshannymi sluchajnym obrazom\n\/\/po massivu K, soderzhaschemu nomera pozitsij, kotorye zanimali sootvetstvuyuschie elementy A\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],k[size],i,t;<br \/>\n printf(&#171;Vvedite massiv A i iznachal&#8217;nye pozitsii kazhdogo elementa\\n&#187;);<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%i], K[%i]> &#171;,i,i);<br \/>\n\t scanf(&#171;%i%i&#187;,&#038;a[i],k[i]);<br \/>\n\t}<br \/>\n for(i=0;i<size;i++)\n\t{\n\t t=a[k[i]];\n\t a[k[i]]=a[i];\n\t a[i]=t;\n\t}\n printf(\"Rezul'tat:\\n\");\n for(i=0;i<size;i++)\n \tprintf(\"A[%i]=%i\",i,a[i]);  \n getch();\n}\n\n\n\n************************************************************************\n\/\/perenesti v nachalo massiva vse otritsatel'nye elementy, zateem nulevye\n\/\/i v kontse otritsatel'nye (poryadok sledovaniya v kazhdoj gruppe sohranit')\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define size 30<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],i,t,p=0;<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"A[%i]> &#171;,i);<br \/>\n\t scanf(&#171;%i&#187;,&#038;a[i]);<br \/>\n\t}<br \/>\n for(i=0;i<size;i++)\n\tif(a[i]<0)\n\t\t{\n\t\t t=a[i];\n\t\t a[i]=a[p];\n\t\t a[p]=t;\n\t\t p++;\n\t\t}\n for(i=0;i<size;i++)\n\tif(a[i]==0)\n\t\t{\n\t\t t=a[i];\n\t\t a[i]=a[p];\n\t\t a[p]=t;\n\t\t p++;\n\t\t}\n printf(\"Rezul'tat:\\n\");\n for(i=0;i<size;i++)\n \tprintf(\"A[%i]=%i\\n\",i,a[i]);\n getch();\n}\n\n\n************************************************************************\n\/\/najti v tselochislennom massive chislo cheredovanij znaka (s '+' na '-' i naoborot)\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define size 20<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],i,k=0;<br \/>\n printf(&#171;Vvedite %i tselyh chisel\\n&#187;,size);<br \/>\n for(i=0;i<size;i++)\n\tscanf(\"%i\",&#038;a[i]);\n for(i=1;i<size;i++)\n\t{\n\t if((a[i]==0&#038;&#038;a[i-1]!=0)||(a[i]<0&#038;&#038;a[i-1]>0)||(a[i]>0&#038;&#038;a[i-1]<0))\n    \tk++;\n   }\n printf(\"V massive %i cheredovanij znaka\",k);  \n getch();\n}\n\n\n\n************************************************************************\n\/\/poluchit' novyj massiv umnozheniem kazhdogo elementa ishodnogo massiva na minimal'nyj\n\n#include <conio.h><br \/>\n#include <time.h><br \/>\n#include <stdio.h><br \/>\n#include <stdlib.h><\/p>\n<p>#define n 50<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n randomize();<br \/>\n unsigned a[n],i,min=4294967296;<br \/>\n float b[n];<br \/>\n printf(&#171;Ishodnyj massiv:\\n&#187;);<br \/>\n for(i=0;i<n;i++)\n \t{\n    a[i]=random(4294967296);\n    printf(\"A[%u]=%u\\n\",i,a[i]);\n    if(a[i]<min)\n    \tmin=a[i];\n\t}\n printf(\"Rezul'tat:\\n\");\n for(i=0;i<n;i++)\n\t{\n\t b[i]=a[i]*min;\n\t printf(\"B[%i]=%.0f\\n\",i,b[i]);\n   }\n getch();\n}\n\n\n\n************************************************************************\n\/\/kazhdyj tretij element zamenit' polusummoj dvuh predyduschih,\n\/\/a stoyaschij pered nim - polusummoj sosednih elementov\n\n#include <conio.h><br \/>\n#include <time.h><br \/>\n#include <stdio.h><br \/>\n#include <stdlib.h><\/p>\n<p>#define size 50<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n randomize();<br \/>\n unsigned a[size],i;<br \/>\n printf(&#171;Ishodnyj massiv:\\n&#187;);<br \/>\n for(i=0;i<size;i++)\n \t{\n    a[i]=random(4294967296);\n    printf(\"A[%u]=%u\\n\",i,a[i]);\n\t}\n printf(\"Rezul'tat:\\n\");\n for(i=2;i<size;i+=3)\n\t{\n\t a[i]=a[i-2]+a[i-1];\n\t a[i-1]=a[i]+a[i-2];\n\t printf(\"A[%i]=%i\\nA[%i]=%i\\nA[%i]=%i\\n\",i-2,a[i-2],i-1,a[i-1],i,a[i]);\n   }\n getch();\n}\n\n\n\n************************************************************************\n\/\/chisliteli i znamenateli drobej zadany dvumya tselochislennymi massivami\n\/\/najti naibol'shuyu drob', zadannuyu etimi massivami\n\n#include <conio.h><br \/>\n#include <stdio.h><\/p>\n<p>#define size 20<\/p>\n<p>void main()<\/p>\n<p>{<br \/>\n clrscr();<br \/>\n int a[size],b[size],i,p;<br \/>\n float m=-1e37;<br \/>\n printf(&#171;Vvedite chisliteli i znamenateli %i drobej\\n&#187;,size);<br \/>\n for(i=0;i<size;i++)\n\t{\n\t printf(\"N%i> &#171;,i+1);<br \/>\n\t scanf(&#171;%i%i&#187;,&#038;a[i],&#038;b[i]);<br \/>\n    if(((float)a[i]\/b[i])>m)<br \/>\n      {<br \/>\n    \t m=(float)a[i]\/b[i];<br \/>\n       p=i;<br \/>\n      }<br \/>\n\t}<br \/>\n printf(&#171;Naibol&#8217;shaya drob&#8217; &#8212; N%i (%.3f)&#187;,p,m);<br \/>\n getch();<br \/>\n}<\/p>\n","protected":false},"excerpt":{"rendered":"<p>\/\/vvesti s klaviatury odnomrernyj massiv tselyh chisel \/\/i vyvesti na ekran kolichestvo nenulevyvh elementov #include #include #define size 15 void main() { clrscr(); printf(&#171;Vvedite %i elementov massiva tselyh chisel:\\n&#187;,size); int a[size],i,k=0; for(i=0;i<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[36],"tags":[],"_links":{"self":[{"href":"https:\/\/studentpmr.ru\/index.php?rest_route=\/wp\/v2\/posts\/23635"}],"collection":[{"href":"https:\/\/studentpmr.ru\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/studentpmr.ru\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/studentpmr.ru\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/studentpmr.ru\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=23635"}],"version-history":[{"count":1,"href":"https:\/\/studentpmr.ru\/index.php?rest_route=\/wp\/v2\/posts\/23635\/revisions"}],"predecessor-version":[{"id":23636,"href":"https:\/\/studentpmr.ru\/index.php?rest_route=\/wp\/v2\/posts\/23635\/revisions\/23636"}],"wp:attachment":[{"href":"https:\/\/studentpmr.ru\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=23635"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/studentpmr.ru\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=23635"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/studentpmr.ru\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=23635"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}