Question

(Паскаль) Даны два числа. Большее число возвести в квадрат. (Составьте программу)

Answer 1

Ответ:

привет. программа на фото

Answer 2

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

pascalCopy code
program SquareOfGreaterNumber;

var
  number1, number2, result: integer;

begin
  // Ввод чисел
  writeln('Введите первое число: ');
  readln(number1);

  writeln('Введите второе число: ');
  readln(number2);

  // Проверка и возведение в квадрат
  if number1 > number2 then
    result := number1 * number1
  else
    result := number2 * number2;

  // Вывод результата
  writeln('Квадрат большего числа: ', result);

  readln;
end.

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

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