Question

Задание на языке паскаль: Ввести переменные A, B, C (целые числа), если A>B, то C=A-B, если A вывести C

Answer 1

var

 A, B, C: integer;

begin

 read(A, B, C);

 if (A > B) then C := A - B

 else write(C);

end.

Answer 2

Привет! Ниже приведено задание на языке Pascal, которое выполняет описанную вами логику:

pascalCopy code
program Task;

var
  A, B, C: Integer;

begin
  // Вводим значения переменных A, B, C
  Write('Введите значение A: ');
  Readln(A);

  Write('Введите значение B: ');
  Readln(B);

  // Проверяем условие A > B и выполняем соответствующее действие
  if A > B then
    C := A - B
  else
    C := A + B;

  // Выводим значение C
  WriteLn('Результат: ', C);
end.

Пользователь вводит значения для A и B, после чего программа проверяет условие A > B. Если оно истинно, то C будет равно разнице A и B (C = A - B). В противном случае, C будет равно сумме A и B (C = A + B). Затем программа выводит результат C.