Question

написать программу в среде Delphi, которая проверяет находится ли введённое с клавиатуры число в массиве.

Answer 1

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.

Answer 2

Писал на мове Паскаль. Не знаю подойдет ли...

Answer 3

Хотя должно

Answer 4

не могли бы вы мне объяснять по какому принципу она работает

Answer 5

всё поняла как она работает