Дано расстояние в километрах, вывести сколько это метров и сантиметров Pascal

Question

Информатика

Аввакум

11 февраля, 20:57

Дано расстояние в километрах, вывести сколько это метров и сантиметров Pascal

+1

Ответы (1)

Знаешь ответ?

Мариамночка · Answer 1

Var

k: real;

begin

writeln ('Расстояние в километрах ');

readln (k);

writeln ('Расстояние в метрах ');

writeln (k * 1000);

writeln ('Расстояние в сантиметрах ');

writeln (k * 100000);

end.