Тест на тему ""
- max then max:=A[i]
- Edit1.Text:=InttoStr(max)
- end
- Процедура для ...Табличні величини
- procedure TForm1.Button2Click(Sender: TObject)
- begin Max:=A[1Табличні величини
- procedure TForm1.Button2Click(Sender: TObject)
- begin Max:=A[1Табличні величини
Натисни на цю кнопку щоб побачити правильну відповідь
Правильна відповідь виділена іншим кольором.
Якщо правильних відповідей декілька, то всі вони будуть виділені іншим кольором.
-
- max then max:=A[i]
- Edit1.Text:=InttoStr(max)
- end
- Процедура для ...Табличні величини
- procedure TForm1.Button2Click(Sender: TObject)
- begin Max:=A[1Табличні величини
- procedure TForm1.Button2Click(Sender: TObject)
- begin Max:=A[1Табличні величини