Jak za pomocą Turbo Pascala napisać program wypisujący "x" potęg liczby 2?
Turbo Pascal nie prędko póki co wyjdzie z programu nauczania w szkołach średnich. Jakiś czas temu spotkałem się z pytaniem, jak napisać program w pascalu, który wypisuje 5 kolejnych potęg liczby 2. Cóż, rozwiązanie jest bardzo proste, ale nie każdemu przychodzi to do głowy od razu.
Kroki
1
Potrzebujemy zdefiniować dwie zmienne. Pierwszą jako integer, a drugą jako real. Dodatkowo przyda się nam zmienna, która przyjmie domyślną wartość instrukcji.
Powiedzmy:
var
i,l : integer;
p : real;
Powiedzmy:
var
i,l : integer;
p : real;
2
Zmienna "i" potrzebna nam będzie do przechwycenia wartości podanej przez użytkownika.
Zmienna "l" przyjmie domyślną wartość instrukcji for = 1.
Zmienna "p" odpowiedzialna będzie za wypisanie potęgi liczby 2, dlatego też jest to zmienna typu real, bo użytkownik może podać i:=100;.
Zmienna "l" przyjmie domyślną wartość instrukcji for = 1.
Zmienna "p" odpowiedzialna będzie za wypisanie potęgi liczby 2, dlatego też jest to zmienna typu real, bo użytkownik może podać i:=100;.
3
Musimy teraz zdefiniować jedną instrukcję. Będzie to instrukcja for i:=1 do i, ponieważ ma się ona wykonać minimum 1 raz, a powtarzana ma być do "i" razu - użytkownik definiuje ile razy.
Jedyną rzeczą, którą musimy pamiętać jest nadanie zmiennej "p" wartości równej 1 PRZED INSTRUKCJĄ FOR. Wiemy o tym, że 1 pomnożone przez 2, da wynik 2. Dlatego właśnie musi być zdefiniowana ta wartość przed instrukcją. Jeśli tego nie zrobimy, to każdy wynik będzie równy 0.
Jedyną rzeczą, którą musimy pamiętać jest nadanie zmiennej "p" wartości równej 1 PRZED INSTRUKCJĄ FOR. Wiemy o tym, że 1 pomnożone przez 2, da wynik 2. Dlatego właśnie musi być zdefiniowana ta wartość przed instrukcją. Jeśli tego nie zrobimy, to każdy wynik będzie równy 0.
4
Jak zatem instrukcja ma wyglądać?
p:=1;
for l:=1 to i do
begin
p=p*2;
write(' ',l,' . ',p
end;
p:=1;
for l:=1 to i do
begin
p=p*2;
write(' ',l,' . ',p
end;
5
Dodać należy jeszcze komunikat o podaniu wartości dla "i", oraz odczytać ją z klawiatury.
Tak utworzony program powinien wyglądać, jak na obrazku obok. Oczywiście ja nieco "upiększyłem" ten program i zabezpieczyłem go przed podaniem wartości <=0.
Tak utworzony program powinien wyglądać, jak na obrazku obok. Oczywiście ja nieco "upiększyłem" ten program i zabezpieczyłem go przed podaniem wartości <=0.
6
Działający program możecie pobrać ze strony:
Oceń tę poradę
3.2
(5 głosów)
Twoja ocena:
Zapisywanie głosu...