?>
4. Установи в правильном порядке процесс создания Оглавления 1 Чтобы указать уровень, который должен быть представлен стилем заголовка, введи целое число от 1 до 9 в поле группы Уровень, расположенное рядом с именем стиля.2 В группе Доступные стили найди стиль, примененный к заголовкам в документе.3 Нажми кнопку Параметры4 На вкладке Ссылки в группе Оглавление щелкни Оглавление..., а затем выбери в списке пункт Оглавление.5Щелкни в документе место, куда будет вставлено оглавление.
Ответы
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadArrReal('Введите 4 числа:',4);
if Frac(a.Sum/(a[3]-a[2]))=0 then Writeln('Целый результат')
else Writeln('Нецелый результат')
end.
Примеры
Введите 4 числа: 7.2 1.8 25.5 5.5
Целый результат
Введите 4 числа: 36 18.6 12 5
Нецелый результат
Объяснения:
Первый (после begin) оператор объявляет массив из четырех вещественных элементов и заполняет его вводимыми с клавиатуры данными.
Второй делает остальное: вычисляет результат, проверяет, целочисленный ли он и выводит соответствующее сообщение на монитор.