На концерте певицы было а % отдыхающих в санатории, на выступление хора зрителей собралось в 1,5 раза больше. сколько зрителей побывало на этих концертах, если всего в санатории отдыхало х человек.
В файле код программы. Программа округляет числа до ближайшего целого. Вводите количество отдыхающих и процент "A" затем получаете результат вычислений. Программа выводит на экран количество людей побывавших на концерте певицы, на выступлении хора, общее число посетителей концерта и выступления и процент этого числа от общего количества отдыхающих.
Немного не понял, упорядочить по возрастанию снизу вверх. Если выводить будет не так то в этой строчке изменишь знак на '>' if podarr[i] < podarr[i+1] then
program znanija_com; const n = 5; m = 3; type tArray = array[1..n, 1..m] of integer; tPodArray = array[1..n] of real; var arr : tArray; podarr : tPodArray; i,j,sum : integer; procedure swap(var x,y: real); var t: real; begin t := x; x := y; y := t end; begin randomize; writeln('Исходная матрица:'); for i:=1 to n do begin sum:=0; for j:=1 to m do begin arr[i, j]:=random(10); write(arr[i, j], ' '); sum:=sum+arr[i, j]; end; writeln(); podarr[i]:=sum/m; end; for j:=1 to n-1 do for i:=1 to n-j do if podarr[i] < podarr[i+1] then swap(podarr[i],podarr[i+1]); writeln('Результирующий массив:'); for i:=1 to n do writeln(podarr[i], ' '); end.
Программа округляет числа до ближайшего целого.
Вводите количество отдыхающих и процент "A" затем получаете результат вычислений.
Программа выводит на экран количество людей побывавших на концерте певицы, на выступлении хора, общее число посетителей концерта и выступления и процент этого числа от общего количества отдыхающих.