Aktív témák

• #8 kiskekes csendes tag

  2005-09-17 17:13:08 #8

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  kiskekes

  csendes tag

  Bocs hogy amatőr kérdéssel jövök, de most kezdem tanulni a Delphit!
  Szóval ebben a progiban miért nem hajlandó beolvasni a ch változót, ha az char típusú?? (1-et és 2-t szeretném +al illetve -al helyettesíteni)
  uses
  SysUtils;
  var
  a, b, e: real;
  ch: integer;
  
  begin
  e:=0;
  a:=0;
  b:=0;
  repeat
  write('a:'); read(a);
  write('b:'); read(b);
  write('ch:'); read(ch);
  case ch of
  1 : e:=a+b;
  2 : e:=a-b;
  end;
  write(e);
  until e=100;
  { TODO -oUser -cConsole Main : Insert code here }
  end.
  
  [Szerkesztve]

Aktív témák