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

1. Объявление переменных: Нам понадобятся переменные для хранения введенного числа и его дробной части. Также потребуется переменная для хранения результата.
2. Ввод числа: Используем оператор ReadLn для ввода дробного числа с клавиатуры.
3. Выделение дробной части: Для получения дробной части числа нужно использовать математические операции. Мы можем вычесть целую часть из введенного числа.
4. Возведение дробной части в квадрат: Используем оператор возведения в степень.
5. Вывод результата: Выводим результат на экран с помощью оператора WriteLn.

Теперь давайте посмотрим на пример кода, который реализует все эти шаги:

program SquareFractionalPart;
var
    number, fractionalPart, result: real;
begin
    writeln('Введите дробное число:');
    readln(number);
    
    // Выделяем дробную часть
    fractionalPart := number - trunc(number);
    
    // Возводим дробную часть в квадрат
    result := fractionalPart * fractionalPart;
    
    // Выводим результат
    writeln('Квадрат дробной части равен: ', result:0:2);
end.

В этом коде:

• Мы объявляем переменные number, fractionalPart и result типа real.
• Запрашиваем у пользователя ввод дробного числа.
• С помощью функции trunc мы находим целую часть числа и вычитаем ее из исходного числа, чтобы получить дробную часть.
• Возводим дробную часть в квадрат, просто умножив ее на саму себя.
• Выводим результат на экран, форматируя его до двух знаков после запятой.

Таким образом, вы можете ввести дробное число и получить квадрат его дробной части. Если у вас есть вопросы или что-то неясно, не стесняйтесь спрашивать!