Изпечатай

[fenix94]

Имам в училище малко прблеми с Паскал и ще ви бъда много благодарен, ако ми помогнете да ги реша. Става въпрос за 4. подточка на 8.4 . Така трябва да изглежда оутпут-а.

Благодаря

[d0ni]

При така зададеното условие решението, което ще подхожда на знанията ти, е:

Begin
WriteLn('0');
WriteLn('1 0');
WriteLn('2 1 0');
WriteLn('3 2 1 0');
WriteLn('4 3 2 1 0');
End.

б подточка можеш да я направиш аналогично

[b2l]

При така зададеното условие решението, което ще подхожда на знанията ти, е:

Begin
WriteLn('0');
WriteLn('1 0');
WriteLn('2 1 0');
WriteLn('3 2 1 0');
WriteLn('4 3 2 1 0');
End.

б подточка можеш да я направиш аналогично

хахахахахха .

[fenix94]

хаха...Не беше смешно, но все пак благодаря за компетентния отговор

[victim70]

Приятелю пробвай с 2 вложени цикъла. Немога да го напиша на паскал че от 15 години съм го за...л . Но на C изглежда така:

Код:

char i,j;
for(i=0;i<5;i++)
 {
    for(j=i;j>-1;j--)
       {
           printf("%d",j);
       }
    printf("\n");
 }

Дано съм подсказал малко

[arda_kj]

Хващаш ме в добро настроение, иначе наготово така програмки не пиша. Освен това Pascal ми е любимия език, така че печелиш бонус:

Код

GeSHi (Pascal):
Program Example1Loop; //Ime na programata
 
var
  i, j : integer; //promenlivi za for cikyla
begin
 
 for i :=0 to 4 do //pyrvi vlojen cikyl
 begin
    for j := i downto 0 do //vtori vlojen cikyl
    begin
      Write(j); //pe4atai j na ekrana
      Write(' '); //pe4atai interval na ekrana - vyvejda interval mejdu chislata ot edin i syshti red
    end;
    Writeln; //otidi na nov red
 end;
 
end.
 

Обаче от тук се надявам да вържеш логиката и другите задачки сам.