Program t_1; const size=100; var a:array[1..size] of integer; i,n,m,q:integer;begin readln(n); for i:=1 to n do read(a[i]); readln(m); for i:=1 to n do if a[i]=m then begin writeln('YES'); q:=1; break; end; if q=0 then writeln('NO')end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
