zigrin
?>

4. Установи в правильном порядке процесс создания Оглавления 1  Чтобы указать уровень, который должен быть представлен стилем заголовка, введи целое число от 1 до 9 в поле группы Уровень, расположенное рядом с именем стиля.2 В группе Доступные стили найди стиль, примененный к заголовкам в документе.3 Нажми кнопку Параметры4 На вкладке Ссылки в группе Оглавление щелкни Оглавление..., а затем выбери в списке пункт Оглавление.5Щелкни в документе место, куда будет вставлено оглавление.​

Информатика

Ответы

kristeisha871
// PascalABC.NET 3.2, сборка 1381 от 04.02.2017
// Внимание! Если программа не работает, обновите версию!

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

50 решите с объяснением проверьте является ли частное от деления суммы четырех произвольных чисел, в

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

4. Установи в правильном порядке процесс создания Оглавления 1  Чтобы указать уровень, который должен быть представлен стилем заголовка, введи целое число от 1 до 9 в поле группы Уровень, расположенное рядом с именем стиля.2 В группе Доступные стили найди стиль, примененный к заголовкам в документе.3 Нажми кнопку Параметры4 На вкладке Ссылки в группе Оглавление щелкни Оглавление..., а затем выбери в списке пункт Оглавление.5Щелкни в документе место, куда будет вставлено оглавление.​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

aivanova
xsmall1
Olga Arutyunyan
expo3217
Vadim443
Анна498
katushak29
MonashevFesenko1483
галина
garikman-flesh486
pokrov777krest
Serkova_Elena251
ksyrika
Аврамец1911
ivanandrieiev1984268