1. В массиве E хранятся данные измерений среднемесячного расхода электроэнергии за год в киловаттах (Е[1] — данные за январь, Е[2] — за февраль и т.д.). Определите, что будет напечатано в результате выполнения следующего алгоритма.
var i, k, d: integer;
E: array[1..12] of integer;
begin
E[1]:=125; E[2]:=234; E[3]:=168; E[4]:=89;
E[5]:=108; E[6]:=86; E[7]:=108; E[8]:=648;
E[9]:=259; E[10]:=386; E[11]:=250; E[12]:=367;
d:= 1; k:=E[1];
for i:=2 to 12 do begin
if E[i] < k then begin
k:=E[i]; d:=i end
end;
write(d);
end.
2. В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы.
Var k, m: integer;
Dat: array[1..11] of integer;
Begin
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 := 0;
for k := 1 to 11 do
if k > 9 then
begin
m := m + Dat[k]
end;
writeln(m)
end.
3. В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы.
Var k, m: integer;
Dat: array[1..11] of integer;
Begin
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;
for k := 1 to 11 do
if Dat[k] < m then
begin
m := Dat[k]
end;
writeln(m)
end.
4. В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы.
Var k, m: integer;
Dat: array[1..11] of integer;
Begin
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 := 0;
for k := 1 to 11 do
if k< 5 then
begin
m := m + Dat[k]
end;
writeln(m)
End.
138
230
Ответы на вопрос:
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
leo123312109.05.2021 14:11
-
katyat151012.01.2021 05:30
-
mytaevafati28.03.2020 09:57
-
GoodSmileEweryDay29.01.2020 23:15
-
shik0308200108.11.2020 04:20
-
STALKER18KEK29.11.2021 11:43
-
ozorkaltseva07.04.2022 01:12
-
sogianachkebia23.04.2023 04:12
-
wwwwwww630.01.2020 19:10
-
mynomynou23.08.2022 20:09
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.