Равнобедренная пирамида

@DefAster78boom · Регистрация: 09.12.2017

Author24 — интернет-сервис помощи студентам

Напишите программу, которая в стандартное графическое окно выводит равнобедренную пирамиду из кирпичей (см. рисунок ниже). Самый левый кирпич в основании пирамиды должен располагаться у левой границы графического окна, а верхний кирпич — у его верхнего края. Кирпичи должны выводиться сверху вниз. Высота и ширина кирпича в программе задаются константами. Количество кирпичей в основании пирамиды задается с клавиатуры и должно быть не меньше 1 и не больше 30. Пока пользователь не введет значение, попадающее в диапазон от 1 до 30, ему выводится сообщение «Значение должно быть в диапазоне от 1 до 30!», а затем предлагается ввести новое значение. От автора: тут собственно тоже вложенные циклы наверно)

@Puporev · 11.03.2018, 07:51

Pascal

uses graphABC;
const w=20;
      h=10;
var n,x0,x,y:integer;
begin
repeat
write('Введите количество кирпичей в основании пирамиды от 1 до 30 n=')      ;
readln(n);
if not(n in [1..30]) then writeln('Значение должно быть в диапазоне от 1 до 30!');
until n in [1..30];
clearwindow;
setwindowsize(600,300);
centerwindow;
x0:=(n div 2)*w;
y:=0;
setbrushcolor(clChocolate);
for var i:=1 to n do
 begin
  x:=x0-(w div 2)*i;
  for var j:=1 to i do
   begin
    rectangle(x,y,x+w,y+h);
    x:=x+w;
   end;
  y:=y+h;
 end;
end.

@DefAster78boom · 11.03.2018, 09:23 **[ТС]**

Хорошо, спасибо, можете удалить тему пожалуйста? Иначе спишут ещё)

@Puporev · 11.03.2018, 09:25

Сообщение от DefAster78boom

можете удалить тему пожалуйста?

Это нельзя, хотите впредь инкогнито пишите в платный раздел, а это решение есть собственность форума,.

@DefAster78boom 0 / 0 / 0 Регистрация: 09.12.2017 Сообщений: 46
		1
	GraphABC Равнобедренная пирамида 10.03.2018, 20:29. Показов 2049. Ответов 3 Метки нет (Все метки) Напишите программу, которая в стандартное графическое окно выводит равнобедренную пирамиду из кирпичей (см. рисунок ниже). Самый левый кирпич в основании пирамиды должен располагаться у левой границы графического окна, а верхний кирпич — у его верхнего края. Кирпичи должны выводиться сверху вниз. Высота и ширина кирпича в программе задаются константами. Количество кирпичей в основании пирамиды задается с клавиатуры и должно быть не меньше 1 и не больше 30. Пока пользователь не введет значение, попадающее в диапазон от 1 до 30, ему выводится сообщение «Значение должно быть в диапазоне от 1 до 30!», а затем предлагается ввести новое значение. От автора: тут собственно тоже вложенные циклы наверно) Миниатюры 0

@DefAster78boom 0 / 0 / 0 Регистрация: 09.12.2017 Сообщений: 46
	11.03.2018, 09:23 [ТС]	3
	Хорошо, спасибо, можете удалить тему пожалуйста? Иначе спишут ещё) 0

@Puporev Почетный модератор 64299 / 47594 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	11.03.2018, 09:25	4
	Сообщение от DefAster78boom можете удалить тему пожалуйста? Это нельзя, хотите впредь инкогнито пишите в платный раздел, а это решение есть собственность форума,. 0

Опции темы

Равнобедренная пирамида

Решение