Из труб длиной 25 м требуется нарезать трубы длиной 8, 12 и 16 м в количестве 100, 50 и 30 соответственно. определить план раскроя с минимальными , изрезав не более 80 труб.

program mdd; uses crt; var i: longint; beginclrscr; for i: = 10 to 99 dobeginif i mod 13 = 0 then writeln(i); end; readkey; end.

пщояк 17 27 16 33 17

нщёп 15 27 7 17

read(n);

s = str(n);

n1 : = int(s[1]);

n2 : = int(s[2]);

n3 : = int(s[3]);

if (n1+n2+n3) mod 2 = 0 then writeln("сумма чисел четная")

1280*800*24/19800 секунд