Информатика решить вот это !! Имеется массив А(0,2,5,10,5,-1,10) - вопрос №20645991025105110 от CH4PP1E 17.01.2022 20:43

Question

Информатика: Информатика решить вот это !! Имеется массив А(0,2,5,10,5,-1,10) Определите значение переменной S после выполнения фрагмента программы S:=1 TO 7 IF A[i]:= i then S = S+ 1;

CH4PP1E · Answer

2var  a:array[1..7] of integer =(0,2,5,10,5,-1,10);  s,i:integer; begin  for i:=1 to 7 do    if a[i]= i then s := s+1;  print(s);end.----------------2...