Задание № 16434
В массиве Phone хранятся данные о расходах за телефон за год в рублях (Phone[l] — данные за январь, Phone[2] — за февраль и т.д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на трех алгоритмических языках. Ответ запишите без пробелов.
Алгоритмический язык
DIM Phone (12) AS
INTEGER
Phone(1)=52
Phone(2)=71
Phone (3)=88
Phone (4)=31
Phone (5)=17
Phone (6)=82
Phone (7)=74
Phone (8)=91
Phone (9)=24
Phone (10)=61
Phone (11)=50
Phone (12)=31
d = 1: s= Phone(1)
FOR i = 2 TO 12
IF Phone(i) >s
THEN
s= Phone(i)
d=i
END IF
NEXT i
PRINT s,d
END
Бейсик
var d, s, i: integer;
Phone: array[1..12]
of шnteger;
begin
Phone[1]:=52;
Phone[2]:=71;
Phone[3]:=88;
Phone [4]:=31;
Phone [5]:=17;
Phone [6]:=82;
Phone [7]:=74;
Phone [8]:=91;
Phone [9]:=24;
Phone [10]:=61;
Phone [11]:=50;
Phone [12]:=31;
d:= 1; s:= Phone[1];
for i:=2 to 12 do
begin
if Phone[i] >s then
begin
s:= Phone[i]; d:=i
end
end;
write(s,d);
end.
Паскаль
алг
нач
целтаб
Phone[1:12]
цел d, s, i
Phone[1]:=52;
Phone[2]:=71;
Phone [3]:=88;
Phone [4]:=31;
Phone [5]:=17;
Phone [6]:=82;
Phone [7]:=74;
Phone [8]:=91;
Phone [9]:=24;
Phone [10]:=61;
Phone [11]:=50;
Phone [12]:=31;
d:= 1; s:=
Phone[1]
нц для i от 2 до
12
если Phone[i] >s
то
s:= Phone[i]; d:=i
все
кц
вывод s,d
кон
Рассмотрим на языке Паскаль
Начальные значения переменных: d:=1, s:=Phone[1](Равен 52)
Условие Phone[i]>s сравнивает два значения и при выполнении условия присваивает значение переменных s:=Phone[i] и d:=i
Условие проверяет максимальное Phone[i] при i от 2 до 12, в данном случае максимально значение у Phone[8]:=91
При Phone[8]:=91 переменным присваиваются значения s:=91 и d:=9
В результате программы печатаются s и d подряд и без разделителей (write(s,d))
В ответе получаем 918
Ответ: 918
Ответ: 918Нашли ошибку в задании? Выделите фрагмент и нажмите Ctrl + Enter.