Treść zadania

arek273

Napisz program drukujący na ekranie wieżę z literek O:
w dev-pascal
O
OO
OOO
OOOO
OOOOO

Zadanie jest zamknięte. Autor zadania wybrał już najlepsze rozwiązanie lub straciło ono ważność.

Rozwiązania

Podobne materiały

Przydatność 75% Napisz przemówienie na sesję rady gminy, w którym przedstawisz program działan zmierzających do poprawy losu niechcianych zwierząt w twojej miejscowości.

Drodzy radni i goście sesji, Pragnę zwrócić państwa uwagę na problem niechcianych zwierząt, wałęsających się po naszej gminie. Od lat nie potrafimy poradzić sobie z tym kłopotem. Stale się on nasila, powodując znaczny dyskomfort naszych mieszkańców, o czym pisze także lokalna prasa. Czas zacząć walkę z tym problemem....

Przydatność 50% „Lawa”, czyli „Dziady” Adama Mickiewicza na szklanym ekranie.

Książka i film to najczęściej rywalizujące ze sobą formy przekazu. Rywalizacja ta uwidacznia się szczególnie wyraźnie właśnie teraz, w czasach, w których obraz staje się najpopularniejszą formą wypowiedzi. Wśród tytułów filmowych odnajdujemy wiele adaptacji znanych powieści. Wielu młodych ludzi często zastanawia się nad wyborem interesującej ich formy. Najczęściej...

Przydatność 75% Program pozytywistów

Omów założenia europejskiego pozytywizmu Według francuskiego filozofa Augusta Comte’a żyjącego w pierwszej połowie XIX wieku słowo pozytywny znaczy – realny, nie odbiegający od rzeczywistości; użyteczny, służący konkretnym celom; ścisły; pewny i względny – przeciwstawiający się wszystkiemu co absolutne. Przy tym pozytywizm był epoką nastawioną na badanie przez...

Przydatność 100% program trojmian

program trojmian; uses CRT; var a,b,c,x1,x2,delta:real; begin clrscr; write('a='); readln(a); write('b='); readln(b); write('c='); readln(c); delta:=sqr(b)-4*a*c; If (delta>0) then begin x1:=(-b-sqrt(delta))/(2*a); x2:=(-b+sqrt(delta))/(2*a); writeln('x1=',x1); writeln('x2=',x2); end else If (delta<0) then begin writeln('Nie ma rozwiazan'); end else If (delta=0) then...

Przydatność 50% program antymatrix

program antymatrix; uses CRT; var k,i,m:integer; begin clrscr; textcolor(lightgreen); repeat m:=random(25); For i:=1 to 80 do begin gotoXY(i,m+1); k:=random(10); write(k); delay(10); end; until keypressed; end.

0 odpowiada - 0 ogląda - 0 rozwiązań

Dodaj zadanie

Zobacz więcej opcji