6. Архивтеу программаларын көрсет. (Здұрыс жауап бар) A) WinRar:
B) WinArj:
C) Win7;
Д) WinZip; ;​

ответ:WinRar,7Zip,WinZip

Объяснение:

100%-10%=90% стоит покупка после скидки

500: 100%*90%=450 рублей - стоимость покупки с учетом скидки

var x: array[1..n] of integer; (n сам задай)

i,j,k: integer;

begin

for i: =1 to n doreadln(x[i]);

for j: =1 to n-1 dofor i: =1 to n-j doif x[i]< x[i+1] then begin k: =x[i]; x[i]: =x[i+1]; x[i+1]: =k; end;

for i: =1 to n dowriteln(x[i]);

end.