Информатика решить вот это !! Имеется массив А(0,2,5,10,5,-1,10) - вопрос №02510511020645657 от tima2411 31.03.2020 06:51

Question

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

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