Var1 := 15500
Var2 := 10000
Var3 := 20000
Var4 := (Var1+Var2)/1000
Var5 := (Var2+Var3)/1000

Test1(Var4)
Test2(Var5)


Test1(S, L := 1, T := "кг"){	; Число, Округление до N знаков после запятой, Текст.
	Gui, Add, text,, %  StrReplace(Round(S,L),".0") T
}
Test2(S, L := 1, T := "кг"){
	Gui, Add, text,, %  StrReplace(Round(S,L),".0") T
}
Gui,  Show

Var1 := 15500
Var2 := 10000
Var3 := 20000
Var4 := (Var1+Var2)/1000
Var5 := (Var2+Var3)/1000

Test(Var4)
Test(Var5)
Return

Test(S, L := 1, T := "кг"){	; Число, Округление до N знаков после запятой, Текст.
 MsgBox, % RTrim(RTrim(Round(S, L),"0"), ".") T
}

Var1 := 15500
Var2 := 10000
Var3 := 20000
Var4 := (Var1+Var2)/1000
Var5 := (Var2+Var3)/1000
MsgBox, % Round(Var4,1) "кг"
MsgBox, % Round(Var5,1) "кг"

% Round(Var3,1) "кг"	

MsgBox, % Round(Var3,1) "кг"	; Округлить до 1 цифры после запятой.
MsgBox, % RTrim(Var3,"0") "кг"	; Удалить '0' справа.

Var1 := 15500
Var2 := 20000
Var3 := (Var1+Var2)/1000
MsgBox, %Var3%кг