Помогите с Паскалем плиз. Дано число A в годах перевести данное число в часы. В паскаль

Question

Помогите с Паскалем плиз. Дано число A в годах перевести данное число в часы. В паскаль

Answer 1

//PascalABC.Net 3.2
begin
print (readreal('Введите A(год): ')*365*24, 'часов');
end.