Тест на тему "Алгоритми з розгалуженнями для опрацювання величин. Лазарус"
- 1 var A Integer
- X Y Real
- 2 Edit2.Text := FloatStr(Y)
- 3 Edit3.Text := IntToStr(A)
- 4 A := Round(Y)
Натисни на цю кнопку щоб побачити правильну відповідь
Правильна відповідь виділена іншим кольором.
Якщо правильних відповідей декілька, то всі вони будуть виділені іншим кольором.
-
- 1 var A Integer
- X Y Real
- 2 Edit2.Text := FloatStr(Y)
- 3 Edit3.Text := IntToStr(A)
- 4 A := Round(Y)