доброго времени суток!
написал на турбо паскале программку для работы
program dveri;
var
vl,shil,vd,shd,v50x30,v40x20,re,dre,pl: integer;
begin
writeln("высота = ");
readln(vl);
writeln("ширина = ");
readln(shil);
writeln("а рёбер сколько?");
readln(re);
shd=shil-(75+40);
shil=shil-60;
vd=vl-15;
dre=shd*re;
v50x30=vl*2+shil*2;
v20x40=vd*2+shd*2+dre;
pl=vl*shil;
writeln("профиль 50х30:");
writeln("2 x ",vl,"2 x ", shil);
wtiteln("профиль 40x20:");
writeln("2 x ", vd, 2+re, " x ", shd);
writeln("всего будет затрачено:");
writeln("50x30:");
writeln(v50x30);
writeln("40x20:");
writeln(v40x20);
writeln("площадь конструкции:");
writeln(pl);
end.
проблема в том, что в МП я ноль и факов по вводу-выводу я не нашел. у гугла вообще малая выдача по МП =(