Лицензионная - за которую нужно заплатить, чтобы использовать. Условно бесплатная - с наличием срока использования просто так, на пробу, а потом по желанию приобрести после истечения срока. Свободно распространяемая - за которую не надо платить разработчикам, так сказать, отдают даром.
Лицензионные –программы защищенные лицензионным соглашением(при установке ключом). условно -бесплатная - Пользователю предоставляется версия программы с ограниченным сроком действия (после истечения указанного срока программа перестает работать, если за нее не была произведена оплата) свободная программа - или ПО в отношении которого права пользователя на неограниченную установку, запуск программы
Const n = 10; var a: array[1..n] of integer; i, j, t: integer;
begin Randomize; Writeln('Исходный массив'); for i := 1 to n do begin a[i] := Random(16)-10; Write(a[i]:4) end; Writeln; for i := 1 to n-1 do for j := 1 to n-i do if a[j] > a[j+1] then begin t := a[j]; a[j] := a[j+1]; a[j+1] := t end; Writeln('Отсортированный по возрастанию массив'); for i := 1 to n do Write(a[i]:4); Writeln end.
Const m = 3; n = 4; var a: array[1..m, 1..n] of integer; b: array[1..m] of real; i, j, k: integer; min:real;
begin Writeln('Введите оценки студентов'); for i := 1 to m do begin b[i]:=0; for j := 1 to n do begin Read(a[i,j]); b[i]:=b[i]+a[i,j] end; b[i]:=b[i]/n end; k:=1; min:=b[1]; for i:=2 to 3 do if min>b[i] then begin min:=b[i]; k:=i end; Writeln('Студент номер ',k,' имеет минимальный cредний ',min:5:2) end.
Тестовое решение: Введите оценки студентов 5 4 4 3 3 5 3 4 4 5 4 5 Студент номер 2 имеет минимальный cредний 3.75
Условно бесплатная - с наличием срока использования просто так, на пробу, а потом по желанию приобрести после истечения срока.
Свободно распространяемая - за которую не надо платить разработчикам, так сказать, отдают даром.