Замітки одяг

Замітки з міткою «одяг»

Сортувати:: нові; популярні

Вид:: короткий; повний

VynT17pr

whitejaket1

02.12.14, 00:03
одяг, полтава, пошиття одягу, програма, тетяна виноградова

=======Ukr=======

program whitejaket1;
var whifab1, lin, la1, Ea3, Fd3, Ks3, summ3 : real;

begin
clrscr;
writeln (введіть числа, де whifab1 - вартість основної тканини, грн/м, lin - вартість підкладки, грн/м, la1 - вартість мережива, грн/м);

readln (whifab1, lin, la1);
Ea3: = whifab1* 2,0;
Fd3: = lin * 1,7;

Ks3: = la1 * 0,6;

summ3: = Ea3 + Fd3 + Ks3 ;

writeln (summ3 - необхідна сума, грн);

end.

=======Rus=======

program whitejaket1;
var whifab1, lin, la1, Ea3, Fd3, Ks3, summ3 : real;

begin
clrscr;
writeln (введите числа, где whifab1 - стоимость основной ткани, р/м, lin - стоимость подкладки, р/м, la1 - стоимость кружева, р/м);

readln (whifab1, lin, la1);
Ea3: = whifab1* 2,0;
Fd3: = lin * 1,7;

Ks3: = la1 * 0,6;

summ3: = Ea3 + Fd3 + Ks3 ;

writeln (summ3 - необходимая сумма, р);

end.

=======Eng=======

program whitejaket1;
var whifab1, lin, la1, Ea3, Fd3, Ks3, summ3 : real;

begin
clrscr;
writeln (please, write some information, where whifab1 - costs of white fabric, $, lin - costs of lining, $, la1 - costs of lace, $);

readln (whifab1, lin, la1);
Ea3: = whifab1 * 2,0;
Fd3: = lin * 1,7;

Ks3: = la1* 0,6;

summ3: = Ea3 + Fd3 + Ks3;

writeln (summ3 - summa for paying, $);

end.

Рассчет выполнен для жакета

http://photo.i.ua/user/6762292/417413/12572245/

B = 2,0 м - необходимое количество основной ткани

D = 1,7 м - необходимое количество подкладки

S = 0,6 м - необходимое количество кружева

По желанию, вместо предложенного варианта материалов, можно выбирать любые.

Коментарі: 0

VynT17pr

brown&orange_dress1

01.12.14, 22:08
одяг, полтава, програма, сукня, тетяна виноградова

program brown&orange_dress1;
var bror, orn, Ea2, Fd2, summ2 : real;

begin
clrscr;
writeln (введите числа, где bror - стоимость основной ткани, грн/м, orn - стоимость шифона, грн/м);
readln (bror, orn);
Ea2: = bror * 1,5;
Fd2: = orn * 0,6;

summ2: = Ea2 + Fd2;
writeln (summ2 - необходимая сумма, грн);

end.

program brown&orange_dress1;
var bror, orn, Ea2, Fd2, summ2 : real;
begin
clrscr;
writeln (please, write some information, where bror - costs of brown fabric, $, orn - costs of transparent fabric, $);

readln (bror, orn);
Ea2: = bror * 1,5;
Fd2: = orn * 0,6;

summ2: = Ea2 + Fd2;
writeln (summ2 - summa for paying, $);

end.

Рассчет выполнен для платья

http://photo.i.ua/user/5202286/423513/

B = 1,5 м - необходимое количество основной ткани

D = 0,6 м - необходимое количество шифона для отделки

По желанию, вместо предложенного варианта тканей, можно выбирать любые.

Коментарі: 0

VynT17pr

yellow&orange_dress1

01.12.14, 21:57
одяг, полтава, програма, сукня, тетяна виноградова

program yellow&orange_dress1;
var yelor, netfabr, Ea2, Fd2, summ2 : real;

begin
clrscr;
writeln (введите числа, где yelor - стоимость основной ткани, грн/м, netfabr - стоимость сетки для пояса, грн/м);
readln (grefabr, blackfabr);
Ea2: = yelor * 2,1;
Fd2: = netfabr * 0,3;

summ2: = Ea2 + Fd2;
writeln (summ2 - необходимая сумма, грн);

end.

program yellow&orange_dress1;
var yelor, netfabr, Ea2, Fd2, summ2 : real;
begin
clrscr;
writeln (please, write some information, where yelor - costs of yellow fabric, $, netfabr - costs of net-fabric, $);

readln (grefabr, blackfabr);
Ea2: = yelor * 2,1;
Fd2: = netfabr * 0,3;

summ2: = Ea2 + Fd2;
writeln (summ2 - summa for paying, $);

end.

Рассчет выполнен для платья.

http://photo.i.ua/user/5202286/397033/11690929/

B = 2,1 м - количество основной ткани, в данном случае в желто-оранжевые цветы.

D = 0,3 м - количество сетки для пояса.

По желанию, вместо предложенного варианта тканей, можно выбирать любые.

Коментарі: 0