program yellow&orange_dress1; var yelor, netfabr, Ea2, Fd2, summ2 : real;beginclrscr;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...

Читати далі...