Создать блок схему на языке паскаль пересчёта из дюймов в сантиметры (1см=2.54 дюйм)
Var
a:integer;
p:real;
const
d=2.54;
begin
write(Введите число для перевода (см→дюйм) : );
readln(a);
p:=a*d;
writeln(p);
readln;
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Var
a:integer;
p:real;
const
d=2.54;
begin
write(Введите число для перевода (см→дюйм) : );
readln(a);
p:=a*d;
writeln(p);
readln;
end.