gotetho Napisano Czerwiec 14, 2011 Zgłoś Share Napisano Czerwiec 14, 2011 Witam^^ Przygotowałem (z małą pomocą) taki oto kod do programu, który sprawdza czy pierwsza liczba jest wielokrotnością drugiej - Program działa, ale mam inny problem. Muszę obliczyć do niego złożoność czasową i przedstawić w postaci kodu, a nie mam zielonego pojęcia co z tym zrobić... Znajdzie się na to jakaś rada? Oto kod: program wielokrotnosc; uses crt; var a,b,c:integer; label start; begin start: clrscr; writeln('Program ustali czy pierwsza podana liczba jest wielokrotnością drugiej'); writeln('Podaj pierwszą liczbę: '); readln(a); writeln('Podaj drugą liczbę :'); readln(b); if (a<=0) or (b<=0) then begin writeln('Proszę podać TYLKO liczby naturalne'); writeln('Spróbuj jeszcze raz...'); delay(2000); goto start; end else if a mod b = 0 then begin c:=a div b; writeln('Liczba ',a,' jest wielokrotnością liczby ',b,' i jest ',c,' razy większa'); writeln('Sukces! Jeszcze raz?'); delay(2000); goto start; end else writeln(' ',a,' nie jest wielokrotnością ',b,' '); writeln('Wprowadź inne liczby...'); delay(2000); goto start; end. Pozdrawiam gotetho Link do komentarza Udostępnij na innych stronach More sharing options...
Integer Napisano Czerwiec 15, 2011 Zgłoś Share Napisano Czerwiec 15, 2011 Przykłady: http://www.matematyka.pl/255796.htm http://pl.wikipedia.org/wiki/Algorytm_Euklidesa Link do komentarza Udostępnij na innych stronach More sharing options...
Polecane posty
Zarchiwizowany
Ten temat jest archiwizowany i nie można dodawać nowych odpowiedzi.