Читайте также:
|
|
Поверхность, на которую будет монтироваться панель должна быть ровной (подготовка под обои) и непыльной (прогрунтованной). Клей наносится на стенку шпателем с мелким зубом или велюровым валиком. Расход клея 300-350 г/кв.м. - шпателем и 200-250 г/кв.м. валиком. Клей наносится равномерно на всю поверхность, особенно тщательно в области варочной поверхности. Использовать другой вид клея не рекомендуем. Заказчик может самостоятельно произвести монтаж, получив подробную консультацию у производителя, а также отдельно приобрести клей в нужном количестве. Отверстия под розетки вырезаются на месте фрезой диаметром 56 мм или специальным резаком. Внутренний уголок монтируется в случае необходимости, белый, либо в тон изделия. Цвет уголка подбирается индивидуально в средний тон изделия.
5. Расчет стоимости заказа Стоимость 1 кв.м. изделия без монтажа - 4900 рублей. Разберем два примера:
1 пример:
-
- технологическая площадь (ТП), а
- полезная площадь (ПП).
Чтобы избежать стыка двух изделий в области вытяжки, панель делаем по максимальным размерам. При этом часть панели уходит за верхние шкафы кухонного гарнитура.
ТП = 3-0,6 м = 2,4 м
2,4 х 0,2 = 0,48 кв.м.
0,48 кв.м. х 1800 рублей (стоимость за 1 кв.м. при расчете ТП) = 864 рубля.
ПП = 3 м х 0,6 м = 1,8 кв.м.
0,6 м х 0,2 м = 0,12 кв.м.
1,8 кв.м + 0,12 кв.м. = 1,92 кв.м
1,92 кв.м. х 4900 рублей = 9408 рублей.
864 рублей + 9408 рублей = 10272 рублей.
2 пример:
ТП = 3 м -0,62 м = 2,38 м.
2,38 м х 0,2 м. = 0,48 кв.м.
0,48 кв.м. х 1800 рублей = 864 рублей
ПП 3 м х 0,6 м = 1,8 кв.м.
0,72 м х 0,62 м = 0,45 кв.м.
1,8 кв.м. + 0,45 кв.м. =2,25 кв.м.
2,25 кв.м. х 4900 рублей = 11 025 рублей.
864 рублей + 11 025 рублей = 11 889 рублей.
Стоимость монтажа 500 рублей за кв.м., но не менее 1500 рублей.
Разработка программ циклической структуры. Операторы цикла в языке Турбо Pascal.
1.1 Научиться разрабатывать алгоритмы циклической структуры.
1.2 Познакомиться с операторами цикла в языке Паскаль.
2.1 Персональный компьютер
2.2 Среда программирования Turbo Pascal 7.0
2.3 Лекции. Методические рекомендации
Цикл обеспечивает многократное выполнение некоторой совокупности действий, которая называется телом цикла.
В языке Паскаль имеются три вида операторов цикла.
while — цикл ПОКА, цикл с предусловием.
for — цикл ДЛЯ, цикл с параметром.
repeat — цикл ДО, цикл с постусловием.
Операторы тела цикла выполняются до тех пор, пока условие не станет ложным.
while логическое выражение do оператор;
ИЛИ
while логическое выражение do
begin
|
оператор2;
- - - - - - - -
операторn;
end;
При каждом выполнении цикла вычисляется значение логического выражения и если оно истинно, то выполняется оператор, а затем снова проверяется условие и т.д. Как только, на очередном шаге окажется, что условие не соблюдается, то выполнение оператора цикла прекратится.
Если необходимо, чтобы в цикле повторялся не один оператор, а несколько, они должны быть заключены в операторные скобки, т.е. оператор может быть составным.
for параметр:= НЗ to КЗ do оператор;
ИЛИ
for параметр:= НЗ to КЗ do begin
|
оператор2;
- - - - - - - -
операторn;
end;
Этот цикл используется, когда известно число повторений. Оператор может быть простым и составным. Начальное значение (НЗ) и конечное значение (КЗ) имеют тот же тип, что и параметр. Параметр цикла нельзя изменять внутри цикла. Шаг изменения параметра равен 1. Параметр может иметь целый или символьный тип данных.
|
Repeat
|
оператор2;
- - - - - - - -
операторN;
until логическое выражение;
Операторы, заключенные между служебными словами выполняются последовательно до тех пор, пока значение логического выражения ложно, т.е пока не станет истинным.
Пример1. Вычислить значение функции на интервале [-5, 5] с шагом 1
Цикл с параметром
uses Crt;
var x: integer; y: real;
Begin
ClrScr;
writeln (' x y = 2 * x + 5 ');
writeln (' ------------- ');
for x:= -5 to 5 do
Begin
y:= 2 * x + 5;
writeln (x, ' ', y: 5: 2);
end;
readln;
end.
Цикл с предусловием
uses Crt;
var x: integer; y: real;
Begin
ClrScr;
writeln (' x y = 2 * x + 5 ');
writeln (' ------------- ');
x:= -5;
while x<= 5 do
Begin
y:= 2 * x + 5;
writeln (x, ' ', y: 5: 2);
x:= x + 1;
end;
readln;
end.
Цикл с постусловием
uses Crt;
var x: integer; y: real;
Begin
ClrScr;
writeln (' x y = 2 * x + 5 ');
writeln (' ------------- ');
x:= -5;
Repeat
y:= 2 * x + 5;
writeln (x, ' ', y: 5: 2);
x:= x + 1;
until x > 5;
readln;
end.
4.1 Разработать алгоритм программы на языке блок-схем и на языке программирования (см Приложение 1).
Дата добавления: 2014-12-20; просмотров: 111 | Поможем написать вашу работу | Нарушение авторских прав |
|