Информатика, опубликовано 2018-08-22 23:56:19 by Гость
Вывести индекс первого положительного элемента числовой последовательности. Известно, что такой элемент существует.
Ответ оставил Гость
Var
A:real;
i:integer;
Begin
i:=0;
WriteLn(Введи элементы последовательности через пробел);
Repeat
Read(A);
i:=i+1
Until A>0;
Write(i)
End.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.