1)
Запишите значение переменной s, полученное в результате работы следующей программы. Текст программы приведен на алгоритмическом языке:

алг
нач
цел s, k
s := 0
нц для k от 6 до 12
s := s + 5
кц
вывод s
кон

2)
В таблице Dat хранятся данные измерений среднесуточной температуры за неделю в градусах (Dat[1] – данные за понедельник, Dat[2] – за вторник и т.д.).
Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на алгоритмическом языке.

алг
нач
целтаб Dat[1:7]
цел k, m, day
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]
нц для k от 2 до 7
если Dat[k] < m то
m:=Dat[k]; day:=k
все
кц
вывод day
кон

1)var  s,k:integer;begins:=0;begin for k:= 6 to 12 do  s:=s+5;end;write(s);end.Ответ352) var Dat: array [1..7] of integer;k, m, day: integer;beginDat[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];begin for k:=2 to  7 doif Dat[k]<m then  begin m:=Dat[k];  day:=k; end;end;write(day);end.Ответ5