Question

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

Answer 1

Ответ:

program qq;

var a,b: real;

begin

writeln ('Введите, пожалуйста, два числа.');

readln (a, b);

if a>b then writeln ('Наиболее из чисел: ', a:5:5)

else writeln ('Наибольшее из чисел: ', b:5:5);

end.

Объяснение:

Внимание! Цифры вводить через точку, а не через запятую. Лично у меня через запятую не считает.

Answer 2

К сожалению, я не могу выполнить программы напрямую, но я могу предоставить вам код на языке Паскаль, который решит данную задачу. Вот пример программы:

pascalCopy code
program MaxNumber;
var
  num1, num2, maxNum: real;
begin
  num1 := 1.08784;
  num2 := 2.8924;

  if num1 > num2 then
    maxNum := num1
  else
    maxNum := num2;

  writeln('Большее число: ', maxNum);
end.

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