Оператор break

@cmetanka · Регистрация: 08.07.2017

Author24 — интернет-сервис помощи студентам

Почему цикл if не прокручивается??
Только индекс первого элемента находит и все

Pascal

1 2	for i:=1 to 10 do begin if(a[i]=5) then

--------------------------------------

Pascal

program led;
var a:array[1..10] of integer;
i:integer;
begin
for i:=1 to 10 do read(a[i]);
writeln('исходный массив');
for i:=1 to 10 do write(a[i],' ');
writeln;
for i:=1 to 10 do
 begin
if(a[i]=5) then
writeln('5 есть');
else
begin
writeln('5 нету');break;
end;
end;
end.

@Cyborg Drone · 06.02.2018, 21:15

Всё верно. Как Вы написали, так оно и работает. Как только встречается элемент, не равный 5, цикл прерывается досрочно. Опишите, что должна выводить программа. Пока что - совершенно не понятно, чо именно Вам не нравится в Вами же написанной программе.

@кот Бегемот · 06.02.2018, 21:15

В вашей программе написано: "как только встретим не равный 5 элемент, сразу выходим из цикла перебора."
А теперь вы на это жалуетесь.
А чего вы хотели-то?

@cmetanka · 06.02.2018, 21:19 **[ТС]**

все)я понял))буду исправлять

@Cyborg Drone Модератор 9870 / 5238 / 3306 Регистрация: 17.08.2012 Сообщений: 16,006
	06.02.2018, 21:15	2
	Сообщение было отмечено ZX Spectrum-128 как решение Решение Всё верно. Как Вы написали, так оно и работает. Как только встречается элемент, не равный 5, цикл прерывается досрочно. Опишите, что должна выводить программа. Пока что - совершенно не понятно, чо именно Вам не нравится в Вами же написанной программе. 0

@кот Бегемот Платежеспособный зверь 8926 / 4354 / 1642 Регистрация: 28.10.2009 Сообщений: 11,568
	06.02.2018, 21:15	3
	В вашей программе написано: "как только встретим не равный 5 элемент, сразу выходим из цикла перебора." А теперь вы на это жалуетесь. А чего вы хотели-то? 0

@cmetanka 0 / 0 / 1 Регистрация: 08.07.2017 Сообщений: 31
	06.02.2018, 21:19 [ТС]	4
	все)я понял))буду исправлять 0

Оператор break

Решение