В таблице Dat хранятся данные измерений среднесуточной температуры за неделю в градусах (Dat[1] – данные за понедельник, Dat[2] – за вторник и т.д.). Определите, что будет напечатано в результате выполнения следующего алгоритма Var k, m, day: integer; Dat: array[1..7] of integer; Begin Dat[1]:=7; Dat[2]:=9; Dat[3]:=10; Dat[4]:=8; Dat[5]:=6; Dat[6]:=7; Dat[7]:=6; day:= 1; m:=Dat[1]; for k:=2 to 7 do begin if Dat[k] < m then begin m:=Dat [k]; day:=k end end write(day); End.

1

Ответы и объяснения

2013-05-17T01:32:46+04:00

Это Проверенный ответ

×
Проверенные ответы содержат надёжную, заслуживающую доверия информацию, оценённую командой экспертов. На "Знаниях" вы найдёте миллионы ответов, правильность которых подтвердили активные участники сообщества, но Проверенные ответы - это лучшие из лучших.
отличное объяснение от yanzilla   

А напечатано будет 5

(минимальная температура была на 5 день)