народ будьте добры , помогите))
напечатать таблицу ( записать как делать ) перевода расстояний в дюймах в сантиметры (1дюйм=2,54 см ) для значений от 1 до 10 дюймов с шагом 1.
напечатать таблицу ( записать как делать ) перевода расстояний в дюймах в сантиметры (1дюйм=2,54 см ) для значений от 1 до 10 дюймов с шагом 1.
More Questions From This User See All
Answers & Comments
sm=2.54; {значение см в 1 дюйме}
var
d:real;
begin
d:=1; {начальное значение - 1 дюйм}
while d<=10 do {пока дюймов меньше или равно, чем 10}
begin
writeln(d,''': ',d*sm:4:2,' sm'); {выводим на экран дюйм - см}
d:=d+1; {увеличиваем шаг на 1}
end;
end.