1. хозяин хочет оклеить обоями стену длиной b и высотой a метров. у него имеется k рулонов шириной 55 см и длиной 10,5 м. хватит ли обоев на оклейку стены? как это решить? *паскаль program gg; var a,b,k,g,u,i,max,w: integer; begin; writeln('введите высоту стены '); readln(a); writeln('введите длину стены '); readln(b); writeln('введите колличество рулонов'); readln(k); u: =(a*b); g: =0.55; w: =10.5; writeln('площадь стены равна метров ',u); i: =g*w*k; writeln('общая площадь обоев метров',i); readln(u,i); if u > i and then writeln ('подходит'); else writeln ('не подходит') end.
