Народ будьте добры , помогите))
напечатать таблицу ( записать как делать ) перевода расстояний в дюймах в сантиметры (1дюйм=2,54 см ) для значений от 1 до 10 дюймов с шагом 1.
Const
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.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
