Чтобы создать программу на Паскале, которая вычисляет сторону и площадь квадрата по известной диагонали, следуйте этим шагам:

1. Определите формулы:
   • Сторона квадрата (a) связана с диагональю (d) по формуле: a = d / sqrt(2)
   • Площадь квадрата (S) вычисляется по формуле: S = a * a или S = (d * d) / 2
2. Создайте структуру программы:
   • Объявите переменные для хранения диагонали, стороны и площади.
   • Запросите у пользователя ввод диагонали.
   • Вычислите сторону и площадь квадрата.
   • Выведите результаты на экран.

Теперь давайте напишем саму программу:

program SquareCalculation;

uses crt, math; // Подключаем библиотеку для использования функции sqrt

var
    d, a, S: real; // Объявляем переменные: d - диагональ, a - сторона, S - площадь

begin
    clrscr; // Очищаем экран
    writeln('Введите длину диагонали квадрата:'); // Запрос ввода
    readln(d); // Считываем диагональ

    // Вычисляем сторону квадрата
    a := d / sqrt(2);
    
    // Вычисляем площадь квадрата
    S := a * a; // Или S := (d * d) / 2;

    // Выводим результаты
    writeln('Длина стороны квадрата: ', a:0:2); // Выводим сторону с двумя знаками после запятой
    writeln('Площадь квадрата: ', S:0:2); // Выводим площадь с двумя знаками после запятой

    readln; // Ожидаем нажатия клавиши
end.

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

Теперь вы можете протестировать программу, вводя различные значения диагонали, и проверять, правильно ли она вычисляет сторону и площадь квадрата.