В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] - градусы за первый день. Dat[2] - за второй и т.д.)
5-9 класс
|
Определите, какое число будет напечатано в результате работы следующей программы.
Паскаль.
Var k, m: integer;
Dat: array[ 1..10] of integer;
Begin
Dat[ 1] := 12;
Dat[ 2] := 15;
Dat[ 3] := 17;
Dat[ 4] := 15;
Dat[ 5] := 14;
Dat[ 6] := 12;
Dat[ 7] := 10;
Dat[ 8] := 13;
Dat[ 9] := 14;
Dat[ 10] := 15;
m := 0;
for k := 1 to 10 do
if Dat[ k] =15 then
begin
m := m+1
end;
writeln(m);
End.
Ответ 3, тк программа проверяет каждый день на температуру 15 градусов, а у вас таких дней 3
Ответ 3, тк программа проверяет каждый день на температуру 15 градусов, а у вас таких дней 3
Если помог нажми "Спасибо"
Другие вопросы из категории
Читайте также
10 дней в градусах (Dat[1] – данные за первый день, Dat[2] – за второй
и т. д.). Определите, какое число будет напечатано в результате работы
следующей программы. Текст программы приведён на трёх языках
программирования
В таблице Dat хранятся данные измерений среднесуточной температуры за неделю в градусах(Dat[1]-данные за понедельник, Dat[2]-за вторник и тд).Определите, что будет напечатано в результате выполнения следующего алгоритма,записанного в четырёх языках.
Dat[2] – второй ученик и т.д.). Определите, что будет напечатано в
результате работы следующей программы.
Алгоритмический
язык
алг
нач
целтаб Dat[1:11]
цел k, m
Dat[1]:=20; Dat[2]:=25
Dat[3]:=19; Dat[4]:=25
Dat[5]:=26; Dat[6]:=22
Dat[7]:=24; Dat[8]:=28
Dat[9]:=26; Dat[10]:=21
Dat[11]:=27
m:= 30
нц для k от 1 до 11
если Dat[k] < m то
m:=Dat[k]
все
кц
вывод m
кон
Определите, что будет напечатано в результате работы следующей программы.Алгоритмический язык