Для создания таблицы целых чисел от 20 до 20 и их квадратов на языке программирования Pascal, можно использовать следующий код:
program Squares;
uses crt;
var
i: Integer;
begin
clrscr;
writeln('Число', #9, 'Квадрат');
writeln('---------------------');
for i := 20 to 20 do
begin
writeln(i, #9, i * i);
end;
readln;
end.
В этом примере программа выводит на экран заголовки "Число" и "Квадрат", а затем в цикле выводит число и его квадрат.
Так как диапазон от 20 до 20 включает только одно число, в результате получится только одна строка таблицы, где будет показано число 20 и его квадрат (400). Если у вас есть вопросы о логике работы программы или о других аспектах языка Pascal, не стесняйтесь задавать их!