Язык: Паскаль Почему при f=true не выводится то,что записано в условии? const n=3; var C: array[1..n] of real; A: array[1..n,1..n] of real; X: array[1..n] of real; F:boolean; P,T:real; i,j:integer; begin writeln('Vvedite matricu A:'); for i:=1 to n do for j:=1 to n do read(A[i,j]); writeln('Vvedite massiv C:'); for i:=1 to n do read(C[i]); writeln('Vvedite znacheniya P,T:'); write('P='); readln(P); write('T='); read(T); x[i]:=0; F:=false; repeat if (P else F:=false; until (i>n) or (F=false); if F then begin for i:=1 to n do for j:=1 to n do x[i]:=x[i] a[i,j]; writeln('X[',i,']=',x[i]); end else writeln('elementy massiva C ne lezhat v intervale P,T'); end.
Вы можете из нескольких рисунков создать анимацию (или целый мультфильм!). Для этого нарисуйте несколько последовательных кадров
и нажмите кнопку Просмотр анимации.
