Написать программу для Паскаль "Квадрат числа" Программу нужно написать на языке Паскаля

держи

Program n_1;

var a, b: integer;

begin

 writeln ('Квадрат числа');

 write ('Введите a');

 read (a);

 b:=a*a;

 writeln ('b:=', b)

end.

В любом компьютере обязательно есть устройства, которые хранят информацию. Устройства хранения информации в компьютере разделяются на оперативную память (память, которая нужна для хранения промежуточных результатов вычислений) и долговременную — здесь хранятся файлы (определение довольно грубое но,суть отражает верно).

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

Подумайте чуть, ведь все просто. Есть массив, у него гдето есть середина, или точка симметрии. Она находится как (n div 2). Если массив четной длины, то он делится на 2 равные части, если нечетный - в середине остается один элемент, который ни с кем менять не надо.
Сейчас смотрим элементы первой половины
for i:=1 to n div 2
запоминаем их x:=a[i];
присваиваем им значения симметричных им элементов с конца
a[i]:=a[n-i+1]; например при n=10 a[1]:=a[10-1+1];
А элементам в конце присваиваем значения запомненных первых элементов
a[n-i+1]:=x;
Все, поменяли.