Если я правильно понял условие(Вывести сколько раз в массиве встречается число введенное с клавиатуры), то
for i:=m to n do
if a[i]=x then k:=k+1;
write(k);
П.с. если условие такое как я понял, то переменная USL вообще не нужна.
#include <stdio.h>
int main() {
int a[20], b[30], c[20], lenC = 0;
for(int i = 0; i < 20; i++) scanf("%d", &a[i]);
for(int i = 0; i < 30; i++) scanf("%d", &b[i]);
for(int i = 0; i < 30; i++)
for(int j = 0; j < 20; j++)
if(b[i] == a[j]) {
c[i] = b[i];
lenC++;
for(int k = j; k < 20; k++)
if(a[k] == b[i]) a[k] = 0;
b[i] = 0;
break;
}
for(int i = 0; i < lenC; i++) printf("%d ", c[i]);
}
Const
N = 10;
Var
C:array[1..N] of integer;
i,k,Max:integer;
P:real;
Begin
Randomize;
P:=1;
k:=0;
Max:=1;
WriteLn('C(',N,') в столбик:');
For i:= 1 to N do
Begin
C[i]:=random(31)-15;
WriteLn(C[i]:4);
if i mod 2 = 0 then P:=P*C[i];
if C[i] > 0 then k:=k+1;
if Abs(C[i]) > Abs(C[Max]) then Max:=i;
End;
Write('C(',N,') в строку:');
For i:= 1 to N do
Write(C[i]:4);
WriteLn;
WriteLn('P = ',P);
WriteLn('k = ',k);
WriteLn('Max = ',C[Max],'[',Max,']');
ReadLn;
End.
Процесс
источник: Животные, охраняя свою территорию, оставляют пахучие метки
Растение
Другое животное сравнивает со своим запахом и делает вывод, что запах не его
Летучая мышь ориентируется в пространстве, испуская ультразвуковые волны
Банк располагает данными о своих вкладчиках