Bład TP 5,5

Dla specjalistów Programowanie
#1

Witam, gdy napisałem program

VAR

liczba,iloczyn:longint;


BEGIN

writeln;

writeln('Podaj jakąś liczbę');

read(liczba);

iloczyn:=liczba*2;

write('Liczba ta pomnożona przez 2 wynosi ',iloczyn);

readln;

END.

Gdy biorę RUN, wpisuje liczbę klikam enter, to program wyłącza mi się do poziomu edycji kodu,

a wynik widać dopiero po ponownym kliknięciu RUN.

O co kaman?

Oczywiście nie tylko przy tym kodzie tak się dzieje.

#2

Zmień sobie read(liczba); => readln(liczba);

Sam sobie odpowiedz co się dzieje jak wprowadzoną liczbę potwierdzasz [Enter] :wink:

i jaka jest reakcja w linii readln; ;D

#3

ehh działa jednak.

SuPer dzięki!

– Dodane 08.04.2010 (Cz) 14:28 –

Ehh no ale co teraz przy takim przykładzie?

VAR

y:longint;

BEGIN

write('podaj liczbę');

IF y=100 THEN writeln('Dobrze!');

IF y<>100 THEN writeln('źle');

readln;

END.
#4 
var

  y:longint;

begin

  writeln('Podaj liczbe: ');

  readln(y);

  if y=100 then

    writeln('Dobrze!');

  if y<>100 then

    writeln('źle');

  readln;

end.

Jak widać, od “programowca” ;/ do programisty to daleka droga :PPP

#5

Ohh, widzę, że jesteś bardzo uzdolniony, jeśli nauczyłeś się programować w jeden dzień…

Ciekawe czy jak się uczyłeś to też byłeś taki mądry.

Ale ogólnie działa, dzięki!

#6

programowiec , proszę poprawić tytuł tematu na konkretny, mówiący dokładniej o problemie. W przeciwnym wypadku temat zostanie usunięty.

#7

Możesz usunąć bo już problem rozwiązany.