s1:=StrToInt(Edit1.text); //кількість стовпчиків s2:=StrToInt(Edit2.text); //кількість рядків