Виправте помилки у наведеній нижче частині програми (помилки лише пунктуаційні):procedure TForm Button Click (Sender: TObject)vart integerbegint=Str Tolnt (Editl Text):if t < 0 then Edit2. Text: Вода перебувас у твердому станіelse if t> 100 then Edit2. Text = Вода перебуває у газоподібному станіelse Edit2. Text Вода перебуває у рідкому стані:end;​за неправильный ответ бан