Question

Напиши программу на языке программирования Паскаль. С клавиатуры задаются три вещественных числа. Выведи на экран значение суммы 1 и 3 введённого числа. Частного 2 числа и числа 10.3 Во сколько раз второе введенное число больше первого. Наберите программный код. Помогите,пожалуйста! Это очень срочно

Answer 1

program temp8;

var

a,b,c:real;

begin

write('Введите три вещественных числа》');

read(a,b,c);

writeln('Сумма 1 и 3 введённого числа》',a+c);

writeln('Частное 2 числа и числа 10.3》',b/10.3);

write('Второе введенное число больше первого》',b/a,' раз');

end.

Answer 2

Программа на языке программирования Паскаль, которая выполняет описанные операции:

program Calculate;
var
  num1, num2, num3: real;
  sum, quotient, ratio: real;
begin
  // Ввод трех вещественных чисел
  writeln('Введите первое число: ');
  readln(num1);
  
  writeln('Введите второе число: ');
  readln(num2);
  
  writeln('Введите третье число: ');
  readln(num3);
  
  // Вычисление суммы 1 и 3 введенного числа
  sum := num1 + num3;
  writeln('Сумма первого и третьего числа: ', sum);
  
  // Вычисление частного 2 числа и числа 10.3
  quotient := num2 / 10.3;
  writeln('Частное второго числа и числа 10.3: ', quotient);
  
  // Вычисление разницы между вторым и первым числом
  ratio := num2 / num1;
  writeln('Во сколько раз второе число больше первого: ', ratio);
end.

Эта программа сначала запрашивает ввод трех вещественных чисел, затем вычисляет сумму первого и третьего числа, частное второго числа и числа 10.3 и отношение второго числа к первому. Все результаты выводятся на экран.