Дан массив а целых чисел состоящий из 15 элементов. - вопрос №40831115 от popovat496 08.05.2023 20:28

Question

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

popovat496 · Answer

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....