Проверить, находится ли в массиве введенное с клавиатуры число

@trewaz · Регистрация: 12.03.2010

объесните программу пожалуста в каком случае 'есть' в каком 'нет'

Pascal

const
n = 10;
var
a:array[1..n] of integer;
i,c:integer;
begin
for i:= 1 to n do
readln(a[i]);
write('n = ');
readln(c);
for i:= 1 to n do
if c = a[i] then begin
writeln('estj');
halt;
end;
writeln('netu');
end.

@WolfCF · 16.03.2010, 15:34

задание какое было?

@trewaz · 16.03.2010, 15:40 **[ТС]**

написать программу, которая проверяет, находиться ли в массиве введенное с клавиатуры число(методом перебора элементов).

@Puporev · 17.03.2010, 11:06

Pascal

for i:= 1 to n do//идем по массиву, перебор
if c = a[i] then begin//если попалось это число
writeln('estj');//сообщаем
halt;//выходим
end;
writeln('netu');//дошли до конца и не попалось, сообщаем нет

@WolfCF 3308 / 1370 / 110 Регистрация: 28.04.2009 Сообщений: 4,822
	16.03.2010, 15:34	2
	задание какое было? 0

@trewaz 0 / 0 / 0 Регистрация: 12.03.2010 Сообщений: 33
	16.03.2010, 15:40 [ТС]	3
	написать программу, которая проверяет, находиться ли в массиве введенное с клавиатуры число(методом перебора элементов). 0

Опции темы

Проверить, находится ли в массиве введенное с клавиатуры число

Решение