Pascal - działanie, wynik

 
Napisz nowy temat   Odpowiedz do tematu    Forum Wszystko o Turbo Pascalu Strona Główna -> Problemy
Zobacz poprzedni temat :: Zobacz następny temat  
Autor Wiadomość
saszaw90
Nowy



Dołączył: 09 Lut 2012
Posty: 1
Przeczytał: 0 tematów

Ostrzeżeń: 0/5

PostWysłany: Czw 22:12, 09 Lut 2012    Temat postu: Pascal - działanie, wynik

Witam! Mam natomiast problem z tym programem. Żadna odpowiedź z nich nie pasuje. Myślę, że ja czegoś nie rozumiem, o co chodzi. Jaka powinna być odpowiedź?

Która z odpowiedzi jest prawidłowa:

Kod:

program Z6_10;
function p(var a:integer):integer;
begin
a:=a*6;
p:=a;
end;

function q(a:integer):integer;
begin
a:=a-4;
q:=a;
end;

var
x,y,z:integer;
begin
z:=11;
x:=p(z)+q(z)*z;
y:=z-(p(z)+q(z));
writeln(z:6,x:6,y:6);
readln;
end.


Odpowiedzi:
a) 396 4158 -722
b) 39 458 77
c) 396 418 -77
d) 96 415 -72

Natomiast mi wyszło:
396 143 -62

Dobra, myślę, że jest tu błąd w odpowiedziach. Ale problem jest taki, że nie tylko mam ten przykład, ale również inny, czyli

Kod:
program Z6_11;

function p(a:integer):integer;
begin
a:=a-3;
p:=a;
end;

function q(var a:integer):integer;
begin
a:=a+3;
q:=a;
end;

var
x,y,z:integer;
begin
writeln;
z:=3;
x:=z*(p(z)+q(z));
y:=(p(z)+q(z))*z;
writeln(z:6,x:6,y:6);
readln;
end.


Odpowiedzi:
a) 6 18 60
b) 3 18 39
c) 9 18 108
d) 12 36 144

Też nie pasuje, bo mi wyszło: 9 54 135

Dodam, że mam jeszcze 2 podobne takie przykłady i również odpowiedzi się nie zgadzają. Nie wierzę, że to błąd w odpowiedziach. Musi być coś, czego ja nie rozumiem.


Post został pochwalony 0 razy
Powrót do góry
Zobacz profil autora
Wyświetl posty z ostatnich:   
Napisz nowy temat   Odpowiedz do tematu    Forum Wszystko o Turbo Pascalu Strona Główna -> Problemy Wszystkie czasy w strefie EET (Europa)
Strona 1 z 1

 
Skocz do:  
Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach


Bluetab template design by FF8Jake of FFD
fora.pl - załóż własne forum dyskusyjne za darmo
Powered by phpBB © 2001, 2002 phpBB Group
Regulamin