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) оператор объявляет массив из четырех вещественных элементов и заполняет его вводимыми с клавиатуры данными.
Второй делает остальное: вычисляет результат, проверяет, целочисленный ли он и выводит соответствующее сообщение на монитор.