Информатика решить вот это !! Имеется массив - вопрос №20645991025105110 от NekoChan625 31.07.2022 12:52

Question

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

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