8 odpowiedzi w tym temacie

[Scripting]

Pomógłby mi ktos w tym zadaniu? (na jutro)

Mam napisac program z wykorzystaniem instrukcji repeat until wyswietlający calą tabliczkę mnożenia.

Użytkownik Scripting edytował ten post 02.01.2012 15:49

[Jak się nazwać]

Hahah też to musiałem ale w eli i w pascalu no to tak ja to zrobiłem tak opiszę co i jak:
- zmienne a i b
- a i b = 1
- pętla lub 2 (zrobiłem 2 sposobami) pierwsza to odliczanie do 100 i powiększasz w niej a o 1 ale jeśli a == 10 to a = 1 i b++
- i oczywiście co krok wyświetlasz to
Jak chcesz gotowy kod to napisz w tym temacie to ci podam w pascalu jak znajdę czas bo c++ jeszcze nie miałem a nie chce mi się szukać jak to tam wygląda


@@@ Edit repalt util to jednak też w pascalu . Tej pętli jeszcze nie miałem ale ogarnę zaraz

@@ Edit nie mam tu kompilatora ale powinno działać

USES CRT;



VAR

a,b:longint;



BEGIN

clrscr;

writeln(' A oto tabliczka mnożenia:');

a:=0;

REPEAT

a:=a+1;

b:=0;

REPEAT

b:=b+1;

writeln(a,'*',b,'=',a*;

UNTIL b=10;

UNTIL a=10;

END. 

Użytkownik Jak się nazwać edytował ten post 02.01.2012 16:09

[Scripting]

Gdy skompilowalem, wzielem "Run" to wyskoczylo tak szybko te odliczanie w ciagu okolo sekundy, ze nawet nie mozna tego zobaczyc i sie zamyka

[G[o]Q]

dodaj przed ostatnim endem

readln

[sebul]

Dodaj readln na końcu, znaczy się tak jak wyżej, przed ostatnim endem

[Scripting]

hmm a czemu jest tak?

8*7=56
...
10x10=100

chodzi mi o to ze w miejscu kropek leci tak jak powinno, ale czemu zaczyna sie od 8*7? tzn zaczyna sie to od 0, ale pokazuje dopiero od 8*7 a reszte ucina czy jak? sorki za takie pytania, ale dopiero sie tego ucze i wole wam zadac pytanie i potem na przyszlosc wiedziec takie rzeczy
Wedlug mnie powinno wyskoczyc to
A oto tabliczka mnożenia:
a potem liczby


a tak ogolnie thx bo dziala

Użytkownik Scripting edytował ten post 02.01.2012 19:12

[G[o]Q]

konsola w pascalu ma wysokosc 22 i szerokosc 80 wierszy dlatego tak jest ja bym polecal taki kod

USES CRT;

VAR
a,b:longint;

BEGIN
clrscr;
writeln(' A oto tabliczka mnożenia:');
a:=0;
REPEAT
a:=a+1;
b:=0;
REPEAT
b:=b+1;
write(a*B,' ');
UNTIL b=10;
writeln('');
UNTIL a=10;
readln;
END.

Użytkownik G[o]Q edytował ten post 02.01.2012 19:44

[Scripting]

Dziękuje wszystkim

Przyda sie zarowno pierwszy jak i drugi program, samemu na pewno bym tego nie zrobil, ale po woli zaczynam sie uczyc Dziekuje jeszcze raz, ciesze sie ze tak szybko zareagowaliscie, poniewaz potrzebowalem to na jutro

[sebul]

Wiadomość wygenerowana automatycznie


Ten temat został zamknięty przez moderatora.

Powód: Pomoc udzielona

Jeśli się z tym nie zgadzasz, raportuj ten post, a moderator lub administrator rozpatrzy go ponownie.


Z pozdrowieniami,
Zespół AMXX.PL