Uses crt;
var a,max,x,min:integer;
begin clrscr;
write('Vvedite chislo: '); readln(a);
a:=abs(a);
max:=a mod 10;
min:=a mod 10;
while a>0 do begin
x:=a mod 10;
a:=a div 10;
if x>max then max:=x;
if x<min then min:=x;
end;
writeln('Max^2: ',sqr(max));
writeln('Min^2: ',sqr(min));
readln;
<span>end.</span>
Ответ Б
<span>b) Write ('Привет!!!');
</span>
Карта города представляет город
Структура документа (в Word) представляет документ
Схема этажа для эвакуации представляет этаж здания
Содержание книги представляет книгу
Герб государства представляет дух и идею этого государства
4 Мбайт = 4000 Кбайт = 4000000 байт = 32000000 бит
Про ступень не знаю