Lanazhgon 4 ноября 2019 в 07:32

Помогите!!)) Составить в программе Pascal. задачу: перевести килограммы в граммы.

Var  a: real;
begin
  write(Введите количество килограмм:);
  read(a);
  write(a, килограмм = , a * 1000, грамм);
end.
Для комментирования необходимо зарегистрироваться на сайте