5. 5. в таблице dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (dat[1] — данные за первый день, dat[2] — за второй и т. определите, какое число будет напечача-но в результате работы следующей программы. текст программы на трёх языках программирования(паскаль) var k, m: integer; dat: of integer; begin dat[1] : = 2; dat[2] : = 5; dat[3] : = 8; dat[4] : = 5; dat[5] : = 4; dat[6] : = 2; dat[7] : = 0; dat[8] : = 3; dat[9] : = 4; dat[10] : = 5; m : = 0; for k : = 1 to 10 do if dat[k] > m then begin m : = dat[k] end; writeln(m); end. запишите значение переменной s, полученное в результате работы следующей программы. текст программы на трёх языках программирования.(паскаль) var s,k: integer; begin s : = 50; for k : = 0 to 8 do s : = s - 4; writeln(s); end. определите, что будет напечатано в результате работы следующей программы. текст программы на трёх языках программирования.(паскаль) var s, k: integer; begin s : = 50; for k : = 1 to 9 do s : = s - 3; write (s); end.
if Dat[k] > m then
m := Dat[k]) Следовательно в m будет храниться 8. Выведет также 8.
Во второй программе из 50 9 раз(при к равных 0,1,2,3,4,5,6,7,8) вычитается число 4. 50-4*9=50-36=14.
Во третьей программе из 50 9 раз(при к равных 1,2,3,4,5,6,7,8,9) вычитается число 3. 50-3*9=50-27=23.