Question

Даны числа a и b написать программу которая выводит номер большего числа,язык паскаль,помогите пожалуйста

Answer 1

Ответ:

Var

 a,b: Integer;

BEGIN

Write('A= ');

Readln(a);

Write('B= ');

Readln(b);

If a>b Then Writeln(a);

If a<b Then Writeln(b);

If a=b Then Writeln('Числа равны');

END.

           

Объяснение:

Answer 2

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

pascalCopy code
program CompareNumbers;

var
  a, b: integer;

begin
  // Ввод чисел с клавиатуры
  write('Введите число a: ');
  readln(a);
  write('Введите число b: ');
  readln(b);

  // Сравниваем числа и выводим номер большего
  if a > b then
    writeln('Большее число - a')
  else if b > a then
    writeln('Большее число - b')
  else
    writeln('Числа a и b равны');
  
  readln;
end.

Эта программа сначала запрашивает у пользователя числа a и b, затем сравнивает их и выводит соответствующее сообщение о большем числе или сообщение о равенстве, если числа равны.