yellow&orange_d ress1
- 01.12.14, 21:57
var yelor, netfabr, Ea2, Fd2, summ2 : real;
clrscr;
writeln (введите числа, где yelor - стоимость основной ткани, грн/м, netfabr - стоимость сетки для пояса, грн/м);
readln (grefabr, blackfabr);
Ea2: = yelor * 2,1;
Fd2: = netfabr * 0,3;
writeln (summ2 - необходимая сумма, грн);
end.
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, $);
Ea2: = yelor * 2,1;
Fd2: = netfabr * 0,3;
writeln (summ2 - summa for paying, $);
end.




















