10. в москве на красной площади установлен памятник минину и . российская государственная библиотека оцифровала документ « описание монумента», который состоит из двух частей: 1) текстовая часть; 2) именной список лиц, участвовавших в добровольных приношениях на сооружение монумента. сотрудники коммерческого банка, объехав все цеха санкт-петербурга, составили сводную ведомость пожертвований. обработаем часть собранной информации с программы. в таблице dat представлены данные о размере добровольных пожертвований на строительство памятника от цеховых старшин санкт-петербурга. • dat[1] — от векса (фельдшерный цех); • dat[2] — от феттера (перчаточный); • dat[3] — от крона (позументный); • dat[4] — от гейдера (токарный); • dat[5] — от вилкеса (парикмахерский); • dat[6] — от адлера (фонарный) и т. д. определите, что будет напечатано в результате работы программы, и какую информацию мы получим: program p1; var i, n: integer; k: real; const dat: array[1..36] of real=(5, 5, 5, 5, 10, 5, 25, 10, 40, 30, 5, 40, 10, 6, 15, 7, 5, 10, 20, 5, 10, 15, 5, 35, 5, 2.5, 3, 2.5, 6, 50, 5, 3, 10, 5, 25, 15); begin k: =0; for i: =1 to 36 do if dat[i]> k then begin k: =dat[i]; n: =i; end; writeln(’k=’,k: 5: 2, ’n=’,n); readln; end. 1) k=50.00 n=30 2) наибольшая величина пожертвования 3) минимальная величина пожертвования 4) k=30.00 n=50 5) общая сумма пожертвований 6) от кого и какого цеха пожертвования

tka4ukilia2017 tka4ukilia2017    1   15.09.2019 15:20    2

Ответы
maryyyyy2 maryyyyy2  07.10.2020 17:35
В программе определяется значение максимального элемента массива (k) и номер этого элемента (n):
k:=0;
for i:=1 to 36 do
 if Dat[i]>k then begin k:=Dat[i]; n:=i; end;
На экран будет выведено k=30.00 n=50
ответ: 4) k=30.00 n=50
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика