Вопрос по информатике:
В кинозале имеется n рядов по m мест в каждом (m и n-константы). Цена билета в первом ряду-1 рубль, в каждом следующем ряду в два раза дороже, чем в предыдущем. Известно, что крайние места каждого ряда на 1 рублю дешевле остальных мест этого ряда. Выведите таблицу с ценами билетов за каждое место (Паскаль) можно пожалуйста простое решение
- 25.07.2018 13:40
- Информатика
- remove_red_eye 5300
- thumb_up 11
Ответы и объяснения 1
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
end
end.
Пример
Введите число рядов и число мест: 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
- 26.07.2018 09:46
- thumb_up 29
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.