Не понятно,что. Ты написал(а),вот 2).Что имеется ввиду?
Чисел - калькулятор
Текста - блокнот, microsoft word
Графики - Adobe Photoshop
<span>Система, включающая в себя другие. Это более сложная система, имеющая свое предназначение, структуру, законы, ресурсы и сознание, в которую заданная система входит как подсистема </span>
<span>В соответствии с принципом иерархичности любая система одновременно является надсистемой для своих элементов и подсистемой для своей надсистемы. </span>
Подсистема <span>- это набор объектов и подсистем, обеспечивающих некоторую функциональность, и взаимодействующих между собой в соответствии с их интерфейсами. Интерфейс подсистемы представляет собой подмножество объединения интерфейсов всех объектов и подсистем, составляющих эту подсистему. В состав подсистемы может входить один, или более взаимозависимых объектов и/или подсистем.</span>
Var a,b:array[1..25] of integer;
i,min,max:integer;
begin
max:=1;
min:=1;
for i:=1 to 25 do begin
read(a[i]);
read(b[i]);
if a[i]>a[max] then max:=i;
if a[i]<a[min] then min:=i;
end;
writeln('Лучший - ',a[max],' длина - ',b[max]);
writeln('Худший - ',a[min],' длина - ',b[min]);
<span>end.</span>
Var a,b,c,max: Integer;
begin
writeln('Введите a,b,c');
readln(a,b,c);
max:=a;
if max<b then max:=b;
if max<c then max:=c;
writeln('Наибольшее число: ',max);
end.