Сначала перечислю несколько основных особенностей sketchup, которые нужно знать и использовать для упрощения и ускорения рисования. Затем будут рассмотрены часто задаваемые во которые возникают при использовании sketchup.

С чего начать? Лучше всего посмотреть серию уроков на русском языке [1]. Общие впечатления от sketchup хорошие. Интерфейс не перегружен функциями, работает быстро. Однако есть и обратная сторона медали. В интерфейсе программы очень много тонкостей, которые нужно знать, чтобы можно было ей пользоваться. К примеру, нужно знать, как правильно работает выравнивание по объектам, осям, как правильно копировать, менять размеры, как делать поворот по разным осям и плоскостям, как правильно рисовать объекты и т. д. Есть и другие недоработки - например, почти трудно рисовать мелкие прецизионные объекты. Обычным не получится нарисовать окружность радиусом менее 0.5 мм, нужно ухищряться - рисовать окружность большего диаметра, и затем применять инструмент Уменьшения (Scale).
var G,F:file of integer;
i,j,n:integer;
s:integer;
c,c1,c2:integer;
begin
writeln;
write('Vvedite n:');
readln(n);
Assign(G,'C:\g.txt');
Assign(F,'C:\f.txt');
Rewrite(F);
for i:=1 to n do
begin
c1:=1;
c2:=1;
for j:=1 to i+1 do begin
if j<i+1 then c1:=c1*2;
c2:=c2*3;
end;
c:=c1+c2;
write(F,c);
end;
Close(F);
Reset(F);
Rewrite(G);
s:=0;
while not Eof(f) do
begin
read(F,c);
if c>0 then c:=c*(-1);
write(G,c);
s:=s+c;
end;
write(G,s);
close(F);
close(G);
reset(G);
writeln('Komponenty fajla j:');
while not Eof(G) do
begin
read(G,c);
write(c);
end;
readln;
end.
Приклад.Виведення таблиці значень функції у файл.
Програма:
program file_of_values;
var
х : Real;
k : Word;
out_file : Text; {тип Text відповідає файлу. що складається із рядків тексту}
function F(x: Real): Real;
begin
F := x/d.O + x);
end;
begin
Assign(out_file, 'c:\user\ivanov\table.dat');
Rewrite(out_file);
x := 0.0;
WriteLn(out_file, 'Таблиця значень функції F(x) = x/(l + x)');
WriteLn(out_file);
WriteLn(out_file, 'x':9, 'F(x)':19);
WriteLn(out_file);
for k := 0 to 50 do
begin
WriteLn(out_file, x:9:3, F(x):19:9);
x := x + 0.1:
if k mod 10 = 9 then WriteLn(out_file);
end;
Close(out_file);
end.