Перевести длину, заданную в дюймах, в сантиметры (10 дюймов = 254 мм).

Program Perevod;

Uses Crt;

const c=2.54; // 1 дюйм - 2,54 сантиметра 

 

var d,r:real; 

begin

   clrscr;

  write(Введите длину в дюймах: );

  readln(d);

  r:=c*d;

  writeln(Длина в сантиметрах равна:,r);

  readkey;

 

end. 

 

 

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку