Кусок медного провода длиной 5 м имеет массу 430 г. чтобы провести проводку в квартире требуется с метров. хватит ли для этой цели мотка провода массой м г? (напишите полностью начиная от названия программы и до end.)

Program Z1;
uses crt;
var
c,m,m1:integer;
begin
writeln('Сколько требуется метров для проводки?');
readln(c);
writeln('Сколько грамм масса провода?');
readln(m1);
m:=c*86;
If m1<m then
writeln('Не хватает проволоки')
else
writeln('Хватает проволоки');
end.