Question

Составьте программу для печати таблицы перевода расстояний из дюймов в сантиметры для значений 10...22 дюйма,если 1 дюйм =25,4мм паскаль за 8 класс

Answer 1

Program asd;
USES crt;
Const d=2.54;
var  i: integer;
begin
For i:=10 to 22 do
 begin 
Writeln(' ',i,' * ',d,' = ',i*d:2:1); 
end;
end.