Поделитесь своими знаниями, ответьте на вопрос:
4) Изучи фрагмент программного кода. В какой строке строковые данные переводятся в целые числа? *1. procedure TForml.Button1Click(Sender: TObject);2. var a:integer;3. begin4. а:=StrToInt(Edit1.Text);5. if (a=8) then6. showmessage('Привет!)7. else8. showmessage Неверно');9. end;
4. а:=StrToInt(Edit1.Text);
Объяснение: