Array117. Дан целочисленный массив размера N. Вставить перед каждой его серией элемент с нулевым значением.
>Решение Pascal
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 | program Array117; uses SysUtils; var a,b : array [1..20] of real; N,i,k: integer; begin Write('N: '); Readln(N); Writeln('A: '); for i:=1 to N do begin write(i,' :'); readln(a[i]); end; b[1]:=0; k:=2; b[k]:=a[1]; for i:=2 to N do begin inc(k); if a[i-1]<>a[i] then begin b[k]:=0; inc(k); end; b[k]:=a[i]; end; a:=b; for i:=1 to k do writeln(a[i]); end. |
>
Решение C
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 | #include <stdio.h> int main(void) { int a[10], b[10]; int n; printf("N: "); scanf("%i",&n); int i; for (i=0; i<n; ++i){ printf("a[%i] : ",i+1); scanf("%i",&a[i]); } int k=1; b[0]=0; b[k]=a[1]; for (i=1;i<n;++i){ ++k; if (a[i-1]!=a[i]){ b[k]=0; ++k; } b[k]=a[i]; } for (i=0; i<=k;++i) a[i]=b[i]; for (i=0; i<=k;++i) printf(" %i : %i\n",i+1,a[i]); return 0; } |
#include
#include
using namespace std;
int main()
{
int n;
cout <> n;
int a[100], b[100] ;
srand(time(0));
for(int i = 0; i < n; i ++)
{
a[i] = rand()%100;
cout << a[i] << endl;
}
int k = 1;
b[0] = 0;
b[k] = a[0];
for(int i = 1; i < n; i++)
{
k ++;
if(a[i-1] != a[i])
{
b[k] = 0;
k ++;
}
b[k] = a[i];
}
for(int i = 0; i <= k; i++)
a[i] = b[i];
for(int i = 0; i <=k ; i ++)
cout << i+1<< ". " << a[i] << endl;
system("pause");
return 0;
}
Админ гений