Втаблице dat хранятся данные о количестве сделанных учениками (dat[1] сделал первый ученик, dat[2] — второй и т. определите число, которое будет напечатано в результате работы следующей программы. текст программы на пяти языках программирования. бейсик python dim dat(10) as integer dim k, m, n as integer dat(1) = 7: dat(2) = 9 dat(3) = 10: dat(4) = 5 dat(5) = 6: dat(6) = 7 dat(7) = 9: dat(8) = 8 dat(9) = 6: dat(10) = 9 m = 10; n = 0 for k = 1 to 10 if dat(k) < = m then m = dat(k) n = k endif next k print m dat = [7, 9, 10, 5, 6, 7, 9, 8, 6, 9] m = 10 n = 0 for k in range(0,10): if dat[k] < = m: m = dat[k] n = k + 1 print (m) паскаль алгоритмический язык var k, m, n: integer; dat: array[1..10] of integer; begin dat[1] : = 7; dat[2] : = 9; dat[3] : = 10; dat[4] : = 5; dat[5] : = 6; dat[6] : = 7; dat[7] : = 9; dat[8] : = 8; dat[9] : = 6; dat[10] : = 9; m : = 10; n : = 0; for k : = 1 to 10 do if dat[k] < = m then begin m : = dat[k]; n : = k; end; writeln(m); end. алг нач целтаб dat[1: 10] цел k, m, n dat[1] : = 7 dat[2] : = 9 dat[3] : = 10 dat[4] : = 5 dat[5] : = 6 dat[6] : = 7 dat[7] : = 9 dat[8] : = 8 dat[9] : = 6 dat[10] : = 9 m : = 10 n : = 0 нц для k от 1 до 10 если dat[k] < = m то m : = dat[k] n : = k все кц вывод m кон с++ #include using namespace std; int main() { int dat[10] = {7, 9, 10, 5, 6, 7, 9, 8, 6, 9}; int m = 10; int n = 0; for (int k = 0; k < 10; k++) if (dat[k] < = m) { m = dat[k]; n = k + 1; } cout < < m; return 0; }
Данная программа ищет минимальное значение массива и оно равно 5. Переменная n тут явно лишняя.
ответ: 5.