Question

ДАЮ 30 БАЛЛОВ НАПИСАТЬ ПРОГРАММУ В ПАСКАЛЕ сажень. Напишите программу, которая переводит сажени в соответствующие единицы измерения современности. Ответ дайте в формате целого числа

Answer 1

Ответ:

#include <iostream>

using namespace std;

int main()

{

cout << "Расстояние в сажнях: ";

double d;

cin >> d;

cout << "\n";

cout << "Расстояние в метрах: " << d * 2.16;

}

Answer 2

Конечно, вот программа на языке Pascal, которая выполняет преобразование саженей в метры:

pascalCopy code
program SazhenToMeters;
var
  sazhen: real;
  meters: integer;
begin
  writeln('Введите количество саженей:');
  readln(sazhen);
  
  // Один сажень равен приблизительно 2.134 метра
  meters := round(sazhen * 2.134);
  
  writeln('Это составляет ', meters, ' метров.');
end.

Программа запрашивает у пользователя количество саженей, а затем преобразует это значение в метры, учитывая, что один сажень примерно равен 2.134 метра. Результат выводится как целое число в метрах.