function getKilograms(X:real,Y:real):real;
begin
getKilograms:=X/100*(100-Y); {масса вещества без воды в тоннах}
getKilograms:= getKilograms*1000; {перевод массы в киллограммы}
end;
Помощь в задачах
Помогите составить программы на Паскале плз я как думаю они не сложные.Буду очень благодарен.
2)Составить программу ,вычесляющую сколько килограммов воды нужно выпарить из Х тонн целлюлозной массы, содержащей Y% воды. Заранее благодарен!)
1)Составить программу , вычесляющую скорость прямолинейного равномерного движения тела , если известны длина пути и время , в течение которого двигалось тело.
2)Составить программу ,вычесляющую сколько килограммов воды нужно выпарить из Х тонн целлюлозной массы, содержащей Y% воды. Заранее благодарен!)
1)Составить программу , вычесляющую скорость прямолинейного равномерного движения тела , если известны длина пути и время , в течение которого двигалось тело.
2)
1)
Под рукой не было компилятора пасцаля, так что могут быть незначительные ошибки
Код:
1)
Код:
function getVelocity(S:real,t:real):real;
begin
getVelocity:=S/t;
end;
begin
getVelocity:=S/t;
end;
Под рукой не было компилятора пасцаля, так что могут быть незначительные ошибки