КГ
Константин Гнездилов

Разработать программу.

Имеется массив А длиной 10 элементов. Разработайте программу вычисляющую номер первого нулевого элемента. Если в массиве нету нулевых элементов выдайте сообщение об этом.

p.s.: Паскаль. Заранее благодарен!

АК
Алена Колодина

key:=false;
for i:=1 to n do
if a [ i ]=0 then begin key:=true; number:=i; break; end;
if key=false then writeln("no zero");
else writeln ("zero is",i);

Похожие вопросы
Разработать программу создания и корректировки файла в Pascal с блок - схемой
Кто впервые разработал программу для вычислительной машины? Кто впервые разработал программу для вычислительной машины?
Здравствуйте, скажите какой программой можно разработать дизайн пригласительных на свадьбу?
помогите Разработать программу
Разработать алгоритм и программу вычисления функции Y в паскале :
Разработать программу, позволяющую ввести базу данных :
Помогите разработать программу тренировок.
Разработать подпрограмму
Разработать подпрограмму (Pascal.ABC)
Кто разработает лучше разработает сайт??