whitejaket1
- 02.12.14, 00:03
=======Ukr=======
program whitejaket1;
var whifab1, lin, la1, Ea3, Fd3, Ks3, summ3 : real;
var whifab1, lin, la1, Ea3, Fd3, Ks3, summ3 : real;
begin
clrscr;
writeln (введіть числа, де whifab1 - вартість основної тканини, грн/м, lin - вартість підкладки, грн/м, la1 - вартість мережива, грн/м);
clrscr;
writeln (введіть числа, де whifab1 - вартість основної тканини, грн/м, lin - вартість підкладки, грн/м, la1 - вартість мережива, грн/м);
readln (whifab1, lin, la1);
Ea3: = whifab1* 2,0;
Fd3: = lin * 1,7;
Ea3: = whifab1* 2,0;
Fd3: = lin * 1,7;
Ks3: = la1 * 0,6;
end.
summ3: = Ea3 + Fd3 + Ks3 ;
writeln (summ3 - необхідна сума, грн);
end.
=======Rus=======
var whifab1, lin, la1, Ea3, Fd3, Ks3, summ3 : real;
begin
clrscr;
writeln (введите числа, где whifab1 - стоимость основной ткани, р/м, lin - стоимость подкладки, р/м, la1 - стоимость кружева, р/м);
clrscr;
writeln (введите числа, где whifab1 - стоимость основной ткани, р/м, lin - стоимость подкладки, р/м, la1 - стоимость кружева, р/м);
readln (whifab1, lin, la1);
Ea3: = whifab1* 2,0;
Fd3: = lin * 1,7;
Ea3: = whifab1* 2,0;
Fd3: = lin * 1,7;
Ks3: = la1 * 0,6;
end.
end.
summ3: = Ea3 + Fd3 + Ks3 ;
writeln (summ3 - необходимая сумма, р);
end.
=======Eng=======
program whitejaket1;
var whifab1, lin, la1, Ea3, Fd3, Ks3, summ3 : real;
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, $);
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;
Ea3: = whifab1 * 2,0;
Fd3: = lin * 1,7;
Ks3: = la1* 0,6;
summ3: = Ea3 + Fd3 + Ks3;
writeln (summ3 - summa for paying, $);
end.
Рассчет выполнен для жакета
B = 2,0 м - необходимое количество основной ткани
D = 1,7 м - необходимое количество подкладки
S = 0,6 м - необходимое количество кружева
По желанию, вместо предложенного варианта материалов, можно выбирать любые.
0
Коментарі