В кинозале имеется n рядов по m мест в каждом (m и n-константы). Цена билета в первом ряду-1 рубль, в каждом следующем ряду в два раза дороже, чем в предыдущем. Известно, что крайние места каждого ряда на 1 рублю дешевле остальных мест этого ряда. Выведите таблицу с ценами билетов за каждое место (Паскаль) можно пожалуйста простое решение

var  i,j,m,n,c:integer;begin  Write('Введите число рядов и число мест: ');  Read(n,m);  c:=1;  Writeln('--- ЭКРАН ---');  for i:=1 to n do begin    Write(c-1:3);    for j:=2 to m-1 do Write(c:3);    Writeln(c-1:3);    c:=c*2    endend.ПримерВведите число рядов и число мест: 4 6--- ЭКРАН ---  0  1  1  1  1  0  1  2  2  2  2  1  3  4  4  4  4  3  7  8  8  8  8  7