Linux за българи: Форуми

Програмиране => Общ форум => Темата е започната от: fenix94 в Jun 14, 2011, 16:17



Титла: Задачи на Паскал(за учулище)
Публикувано от: fenix94 в Jun 14, 2011, 16:17
Имам в училище малко прблеми с Паскал и ще ви бъда много благодарен, ако ми помогнете да ги реша. Става въпрос за 4. подточка на 8.4 . Така трябва да изглежда оутпут-а.
(http://www.freeimagehosting.net/uploads/th.b68ba82f3d.jpg) ($2)
Благодаря


Титла: Re: Задачи на Паскал(за учулище)
Публикувано от: d0ni в Jun 14, 2011, 19:44
При така зададеното условие решението, което ще подхожда на знанията ти, е:

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

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


Титла: Re: Задачи на Паскал(за учулище)
Публикувано от: b2l в Jun 14, 2011, 19:57
При така зададеното условие решението, което ще подхожда на знанията ти, е:

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

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

:D :D :D хахахахахха :D :D :D :D.


Титла: Re: Задачи на Паскал(за учулище)
Публикувано от: fenix94 в Jun 14, 2011, 22:12
хаха...Не беше смешно, но все пак благодаря за компетентния отговор


Титла: Re: Задачи на Паскал(за учулище)
Публикувано от: victim70 в Jun 14, 2011, 22:44
Приятелю пробвай с 2 вложени цикъла. Немога да го напиша на паскал че от 15 години съм го за...л . Но на C изглежда така:

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

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


Титла: Re: Задачи на Паскал(за учулище)
Публикувано от: arda_kj в Jun 15, 2011, 02:54
Хващаш ме в добро настроение, иначе наготово така програмки не пиша. Освен това Pascal ми е любимия език, така че печелиш бонус:

Код
GeSHi (Pascal):
  1. Program Example1Loop; //Ime na programata
  2.  
  3. var
  4.  i, j : integer; //promenlivi za for cikyla
  5. begin
  6.  
  7. for i :=0 to 4 do //pyrvi vlojen cikyl
  8. begin
  9.    for j := i downto 0 do //vtori vlojen cikyl
  10.    begin
  11.      Write(j); //pe4atai j na ekrana
  12.      Write(' '); //pe4atai interval na ekrana - vyvejda interval mejdu chislata ot edin i syshti red
  13.    end;
  14.    Writeln; //otidi na nov red
  15. end;
  16.  
  17. end.
  18.  

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