Напишите наибольшее целое число Х,для которого истинно высказывание: НЕ (Х<8) и НЕ (Х>=14)​

// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!

№1

begin
  var s:=ReadlnString;
  s:=s.RegexReplace('ма','');
  Writeln('Длина=',s.Length,': ',s)
end.

Пример
Ведьма измазала маслом карман гнома
Длина=25: Ведь иззала слом карн гно

№2

begin
  var s:=ReadlnString;
  Writeln('Количество букв "с" равно ',s.Where(t->t='с').Count)
end.

Пример
Ассистент профессора сидел за столом и что-то писал
Количество букв "с" равно 8

№3

begin
  var s:=ReadlnString;
  var d:=s.Where(t->t='е').Count-s.Where(t->t='о').Count;
  if d>0 then Writeln('Буква "е" встречается чаще буквы "о"')
  else
   if d<0 then Writeln('Буква "о" встречается чаще буквы "е"')
   else Writeln('Буквы "е" и "о" встречаются динаковое число раз')
end.

Пример
Мороз и солнце; день чудесный! Еще ты дремлешь, друг прелестный.
Буква "е" встречается чаще буквы "о"

) целые

В Паскале определено 5 целых типов, которые определяются в зависимости от знака и значения, которое будет принимать переменная.

Название типаДлина (в байтах)Диапазон значений Byte10...255 ShortInt 1-128...+127Word20...65 535 Integer2-32 768...+32 767 LongInt4-2 147 483 648...+2 147 483 647

б) логический

Название этого типа BOOLEAN. Значениями логического типа может быть одна из логических констант: TRUE (истина) или FALSE (ложь).

в) символьный

Название этого типа CHAR - занимает 1 байт. Значением символьного типа является множество всех символов ПК. Каждому символу присваивается целое число в диапозоне 0…255. Это число служит кодом внутреннего представления символа.

2. ВЕЩЕСТВЕННЫЕ ТИПЫ.

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

Длина числового типа данных, байтНазвание числового типа данныхКоличество значащих цифр числового типа данныхДиапазон десятичного порядка числового типа данных4Single7..8-45..+386Real11..12-

он содержит компоненты одного типа. Типом компонентов может быть любой тип Турбо Паскаля, кроме файлов. Иными словами, нельзя создать «файл файлов».длина вновь создаваемого файла никак не оговаривается при его объявлении и ограничивается только ёмкостью устройств внешней памяти.

Файловый тип или переменную файлового типа можно задать одним из трёх

<имя>= FILE OF <тип>;

<имя>=TEXT;

<имя>= FILE;

Здесь <имя> - имя файлового типа (правильный индификатор);

FILE, OF – зарезервированные слова (файл,:

· типизированные файлы (задаются предложением FILE OF…);

· текстовые файлы (определяются типом TEXT);

· нетипизированные файлы (определяются типом FILE).

О преобразовании числовых типов данных Паскаля

В Паскале почти невозможны неявные (автоматические) преобразования числовых типов данных. Исключение сделано только для типа integer, который разрешается использовать в выражениях типа real. Например, если переменные описаны следующим образом:

Var X : integer; Y: real;

то оператор

Y := X+2;

будет синтаксически правильным, хотя справа от знака присваивания стоит целочисленное выражение, а слева – вещественная переменная, компилятор сделает преобразование числовых типов данных автоматически. Обратное же преобразование автоматически типа real в тип integer в Паскале невозможно. Вспомним, какое количество байт выделяется под переменные типа integer и real: под целочисленный тип данных integer выделяется 2 байта памяти, а под real – 6 байта. Для преобразования real в integer имеются две встроенные функции: round(x) округляет вещественное x до ближайшего целого, trunc(x) усекает вещественное число путем отбрасывания дробной части