Задача по теме "вложенный цикл" - Pascal ABC

Формулировка задачи:

Доброго времени суток, друзья! Необходимо составить программу в паскале по построению следующей фигуры: 1 0 22 00 333 000 4444 0000 55555 и в обратном порядке(начиная с 55555). Помогите пожалуйста с решением!)


textual

Код к задаче: «Задача по теме "вложенный цикл" - Pascal ABC»

var i,j:byte;
begin
for i:=1 to 5 do
 begin
  for j:=1 to i do write(i);
  writeln;
  if i<5 then
   begin
    for j:=1 to i do write(0);
    writeln;
   end;
 end;
for i:=5 downto 1 do
 begin
  for j:=1 to i do write(i);
  writeln;
  if i>1 then
   begin
    for j:=1 to i do write(0);
    writeln;
   end;
 end;
end.
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.


СДЕЛАЙТЕ РЕПОСТ

5   голосов, оценка 3.400 из 5

Источник
Похожие ответы