Question

Пожалуйста помогите :) В Паскале: Составить программу. Ввести 2 числа. Вычесть из большего меньшее.

Answer 1

Program chisla;
uses crt;
var a,b,c : integer;
begin
Write('Введите два числа: ');
Readln(a,b);
if a>b then c:=a-b else c:=b-a;
Writeln('Разность чисел равна ',c);
end.

Answer 2

Вот пример программы на языке Pascal, которая вводит два числа и вычитает из большего меньшее:

program SubtractNumbers;
var
  num1, num2, result: integer;
begin
  writeln('Введите первое число:');
  readln(num1);
  writeln('Введите второе число:');
  readln(num2);
  
  if num1 > num2 then
    result := num1 - num2
  else
    result := num2 - num1;
  
  writeln('Результат вычитания:', result);
end.

В этой программе мы используем переменные `num1` и `num2` для хранения введенных чисел, а переменную `result` для хранения результата вычитания. Мы сравниваем числа и вычитаем из большего меньшее. Затем выводим результат на экран.

Примечание: Приведенный выше код является примером и может быть изменен или дополнен в зависимости от конкретных требований задачи.

Надеюсь, это поможет! Если у вас есть еще вопросы, не стесняйтесь задавать.