Помогите написать программу, которая переводит мм в дюйм, путем деления.(в одном дюйме 0.0394 мм)

1 мм = 0,0393701 дюйма! 1 дюйм = 25.4 мм 1) var m,d:real; begin write('Введите длину (в мм): '); readln(m); d:=m*0.0394; writeln(m,' мм = ',d:8:4,' дюйма(ов)'); end. 2) var m,d:real; begin write('Введите длину (в мм): '); readln(m); d:=m/25.4; writeln(m,' мм = ',d:8:4,' дюйма(ов)'); end. Пример: Введите длину (в мм): 5 5 мм =   0.1970 дюйма(ов)