Нужно блок-схема на program Pr45; var
a, b, c, d : real;
max : real;
begin
readln(a, b, c, d);
if (a max) then max := b;
if (c > max) then max := c;
if (d > max) then max := d;
a := max;
b := max;
c := max;
d := max;
end
else if not ((a > b) and (b > c) and (c > d)) then
begin
a := sqr(a);
b := sqr(b);
c := sqr(c);
d := sqr(d);
end;
writeln(a : 5 : 2);
writeln(b : 5 : 2);
writeln(c : 5 : 2);
writeln(d : 5 : 2);
readln;
end.

--- Python 3.7.0 ---

import typing  

from typing import List #Импортируем библиотеку, предоставляющую удобные классы для указания типов  

def JoinInteger(ToInt:List[str]): #Функция, склеивающая массив строк в целое число (если возможно)

   return int(''.join(ToInt))

def Caprekar(OrigNumber:str): #Функция, выполняющая описанные действия над числом. Принимает число В ВИДЕ СТРОКИ

   SortedNum = JoinInteger(sorted(list(OrigNumber), key = lambda digit: int(digit), reverse=True))  #Сортируем цифры в числе на основе их числового значения в порядке убывания

   SortedReversed = JoinInteger(str(SortedNum)[::-1].split())

   ToRet = str(SortedNum - SortedReversed)

   return ToRet

def FromFile(fname):  #Функция для считывания входных данных из файла

   with open(fname, 'r', encoding = 'utf-8') as Input:

       readed = Input.read()

       return readed

def Dump(fname, Value): #Записывает в fname значение Value

   with open(fname,'w', encoding = 'utf-8') as Output:

       Output.write(Value)

def main(): #Тело программы

   RawInput = FromFile('input.txt')

   IsCapr = False

   CaprCount = 0  

   temp = RawInput

   while (not IsCapr):

       NewNum = Caprekar(temp)

       print(temp, NewNum)

       if (NewNum == temp): Dump('Output.txt', f'{NewNum}\n{CaprCount}'); return

       temp = NewNum

       CaprCount += 1

if __name__ == '__main__':

   main()

Объяснение:

Разрядность адреса равна 16, что позволяет адресовать 64К слов. Так же, как и в предыдущих моделях ЭВМ ряда Электроника НЦ, верхние 4К слов адресного пространства резервируется для управления периферийными устройствами и регистрами данных. Система прерываний Электроника НЦ-80-1 является подмножеством полной системы прерываний ряда ЭВМ Электроника НЦ-80-1, подобно другим моделям этого ряда управляет периферийными устройствами и имеет векторное обращение к программам автоматического обслуживания. Разрядность адреса памяти определяет адресуемое поле памяти. Динамическое распределение памяти при наличии внешних запоминающих устройств большой емкости предоставляет возможность пользователю считать, что в его распоряжении имеется большая оперативная память, объем которой ограничен только разрядностью адреса в команде. Надеюсь что правильно смогла дать ответ