Каким окажется итог выполнения приводимого ниже фрагмента Delphi-модуля, если Panel1.Tag= 100, Panel2.Tag= 150, Panel3.Tag= 0?

  • 0
  • 1
  • 2
  • 250
  • End;
  • begin t0:= 0;
  • var t0: byte;
  • Edit1.Text:= IntToStr(t0);
  • if Panel1.Tag > 0 then t0:= t0+1;
  • if Panel2.Tag > 0 then t0:= t0+1;
  • if Panel3.Tag > 0 then t0:= t0+1;
  • procedure TForm1.Timer1Timer(Sender: TObject);

К сожалению, у нас пока нет статистики ответов на данный вопрос, но мы работаем над этим.