Question

Помогите пожалуйста разобраться с этим!!!Информатика 7 класс Домашнее задание выполнить в паскале:Ввести три числа и найти наибольшее из них. Пример: Введите три числа: 4 15 9 Наибольшее число 15​

Answer 1

если без циклов то

var a,b,c:integer;

begin

readln(a,b,c);

if(a >= b) and(a>=c) then write(a);

if(b >= a) and(b>=c) then write(b);

if(c >= a) and(c>=b) then write(c);

end

Answer 2

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

pascalCopy code
program Наибольшее_число;

var
  число1, число2, число3, наибольшее: integer;

begin
  writeln('Введите три числа:');
  readln(число1, число2, число3);

  if (число1 >= число2) and (число1 >= число3) then
    наибольшее := число1
  else if (число2 >= число1) and (число2 >= число3) then
    наибольшее := число2
  else
    наибольшее := число3;

  writeln('Наибольшее число: ', наибольшее);
end.

Скопируйте этот код в среду разработки Pascal (например, Lazarus) и запустите программу. После запуска она попросит вас ввести три числа, а затем выведет наибольшее из них. В вашем примере с числами 4, 15 и 9 программа должна вывести "Наибольшее число: 15".