88

Дан массив А целых чисел состоящий из 15 элементов. Заполнить с клавиатуры: найти…

02 марта 2023

Дан массив А целых чисел состоящий из 15 элементов. Заполнить с клавиатуры: найти номер первого отрицательного элемента делящегося на 5 с остатком 2.

категория: информатика

78

var a: array[1… 15]of integer; i,j: integer; beginfor i: =1 to 15 do readln (a[i]); for i: =1 to 15 do beginj: =i; if (a[i]<0) and (a[i] mod 5=-2) then break; end; writeln (j); end.

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...