Поделитесь своими знаниями, ответьте на вопрос:
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.