Question

описать программу по действиям

Answer 1

Ответ:

program Primer;  // Название программы

var  // Раздел для описания переменных

 a, b, max: integer;  // Объявление целочисленных переменных:

• a - хранение первого введенного с клавиатуры числа;
• b - хранение второго введенного с клавиатуры числа;
• max - хранение максимального из них.

begin  // Начало программы

 writeln('Введите два целых числа:');  // Вывод сообщения в консоль формата:

• Введите два целых числа:

 read(a, b);  // Считываем с клавиатуры два числа

 if a > b then // Если значение переменной a > b, тогда

 begin  // Начало цикла if

   max := a;  // В переменную max присваиваем значение переменной a

 end  // Конец цикла if

 else // Иначе

 begin  // Начало цикла else

   max := b;  // В переменную max присваиваем значение переменной b

 end;  // Конец цикла else

 writeln('Наибольшее число: ', max);  // Вывод сообщения в консоль формата:

• Наибольшее число: *значение переменной max*

end. // Конец программы