|много | написать код на языке паскаль,перевод дюймы в сантиметры.

В 1 дюйм = 2.54 сантиметра
var inch: real;
begin
  write("Введите кол. дюймов: "); readln(inch);
writeln(inch," дюймов равно ", inch*2.54," сантиметров");
end.

Program inch_sm;
var d, s: real;
const m = 2.5: real;
begin
write ('Введите количество дюймов: ');
readln(d);
s := d*m;
writeln (d, ' дюймов = ', s, ' сантиметров')
end.

Упрощенный вариант:
program inch_sm;
var d, s: real;
const m = 2.5: real;
begin
readln(d);
s := d*m;
writeln (s)
end.