Question

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

Answer 1

Var  a: real;
begin
  write('Введите количество килограмм:');
  read(a);
  write(a, ' килограмм = ', a * 1000, ' грамм');
end.

Answer 2

Конечно, я могу помочь с составлением программы на Pascal для перевода килограммов в граммы. Вот пример такой программы:

program KilogramsToGrams;

var
  kilograms, grams: real;

begin
  // Вводим значение в килограммах
  write('Введите значение в килограммах: ');
  readln(kilograms);
  
  // Переводим килограммы в граммы
  grams := kilograms * 1000;
  
  // Выводим результат
  writeln('В ', kilograms:0:2, ' кг ', grams:0:2, ' г');
  
end.

В данной программе мы объявляем две переменные: `kilograms` и `grams`, которые будут хранить введенное значение в килограммах и результат перевода в граммы соответственно.

Затем мы просим пользователя ввести значение в килограммах с помощью функции `readln()`.

Далее, мы переводим килограммы в граммы, умножая значение в килограммах на 1000.

И, наконец, выводим результат с помощью функции `writeln()`, указывая какое значение было введено в килограммах и сколько это будет в граммах.

Надеюсь, это поможет! Если у вас есть еще вопросы, буду рад помочь!