Pascal zdrojový kód-Problém

pepo27 · Napísal **pepo27**: 24.03.2012 11:48

Compilátor mi vypisuje chybu v tomto zdrojom kóde:

Kód:

var heslo:string;
var kod:string;
kod := 'aa';
readln(heslo);
if heslo = kod then
begin
writeln('Spravne heslo!');
readln();
end.
else
begin
writeln('Nespravne heslo!');
readln();
end.

prosím o pomoc, kde je chyba?

F3RY · Napísal **F3RY**: 24.03.2012 12:15

1,

Kód:

kod patri do code!

2, synatx: Chyba ti tam hlavny begin! Pri vetveni, su tie begin prikazy zbytocne, a zakoncuju sa prikazom end; End s bodkou davas iba na konci programu.

Gregi555 · Napísal **Gregi555**: 11.04.2012 1:34

Kód:

Program HESLO;
const
  kod: string='aa';
var
  pass: string;

BEGIN
  ReadLn(pass);
  if pass=kod then
    WriteLn('Spravne heslo!')
  else
    WriteLn('Nespravne heslo!');
  ReadLn;

END.

Pascal zdrojový kód-Problém

Podobné témy