Удаление
копирование
перемещение
вставка
Var
n,m,k,i,l,max,min:longint;
begin
max:=-maxlongint;
min:=maxlongint;
readln(n);
for i:=1 to n do
begin
readln(n);
if n>max then max:=n;
if n<min then min:=n;
end;
writeln('Самый высокий ',max);
writeln('Самый низкий ',min);
end.
С
такое сокращение
здесь должы быть символы
Мне известны три группы программного обеспечения:
1. Системное ПО - это программы, управляющие работой аппаратных средств (сюда входят операционная система, драйверы).
2. Прикладное ПО - создание программ для решения конкретных задач (антивирусы, табличные редакторы, учебные программы).
3. Инструментальное ПО - позволяет создавать новые программы.
Dim Massiv(9) As Integer
Dim Max As Integer
Dim x As Integer
Max = Massiv(0)
For x = 1 To 9
If Massiv(x) > Max Then Max = Massiv(x)
Next<span>
</span><span>' c2fbefeeebede8eb3a20caf3eff0e8ffedeee220c42ec52e2028632920442d6d6f6e3535</span><span>
MsgBox(Max)</span>