Хелп
В массиве Day хранятся данные о количестве израсходованных денег за телефон за неделю
(Day [1] — данные за понедельник, Day [2] — за вторник и т.д.). Определите, что будет
напечатано в результате выполнения следующего алгоритма, записанного на двух
алгоритмических языках.
Паскаль
var i, m:
integer;
Day: array[1..7] of
integer;
begin
Day [1]:=79;
Day[2]:=25;
Day [3]:=67;
Day[4]:=80;
Day [5]:=63;
Day[6]:=17;
Day [7]:=68;
m:= 0;
for i:=1 to 7 do
if Day [i] > 50 then
m:= m+1;
write(m);
end.


Алгоритмический язык
алг
нач
целтаб Day[1:7]
цел i, m
Day [1]:=79;
Day [2]:=25;
Day [3]:=67;
Day [4]:=80;
Day [5]:=63;
Day [6]:=17;
Day [7]:=68;
m:= 0
нц для i от 1 до 7
если Day[i] > 50 то
m:= m+1;
кц
вывод m
кон