Математическое моделирование с применением графических построений в ЕХСЕL. Черный А.А. - 82 стр.

UptoLike

Составители: 

82
begin
for J:=1 to X do
begin
write(F0,'├────┼──────────┼──────────┼');
writeln(F0,'──────────┼──────────┤');
write(F0,' ',J:2,' ',F[J]:10,'',H[J]:10,'');
writeln(F0,L[J]:10,'',Z[J]:10,'');
end;
write(F0,'└────┴──────────┴──────────┴');
writeln(F0,'──────────┴──────────┘');
end;
end;
end.
   begin
     for J:=1 to X do
     begin
       write(F0,'├────┼──────────┼──────────┼');
       writeln(F0,'──────────┼──────────┤');
       write(F0,'│ ',J:2,' │',F[J]:10,'│',H[J]:10,'│');
       writeln(F0,L[J]:10,'│',Z[J]:10,'│');
     end;
       write(F0,'└────┴──────────┴──────────┴');
       writeln(F0,'──────────┴──────────┘');
   end;
  end;
end.




                                             82