Задания 10. Циклический алгоритм обработки массива чисел, записанный на алгоритмическом языке
Пройти тестирование по 10 заданиям
Пройти тестирование по всем заданиям
Вернуться к каталогу заданий
Версия для печати и копирования в MS Word
В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] — данные за первый день, Dat[2] — за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER 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 IF Dat(k) = 15 THEN m = m + 1 ENDIF NEXT k PRINT m | Dat = [12, 15, 17, 15, 14, 12, 10, 13, 14, 15] m = 0 for k in range (10): if Dat[k] == 15: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
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.
| алг нач целтаб Dat[1:10] цел k, m 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 нц для k от 1 до 10 если Dat[k]=15 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {12, 15, 17, 15, 14, 12, 10, 13, 14, 15}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] == 15) m = m + 1; cout << m; return 0; } | |
В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] — данные за первый день, Dat[2] — за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER 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 IF Dat(k) > m THEN m = Dat(k) ENDIF NEXT k PRINT m | Dat = [12, 15, 17, 15, 14, 12, 10, 13, 14, 15] m = 0 for k in range (10): if Dat[k] > m: m = Dat[k] print (m)
|
| Паскаль | Алгоритмический язык |
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] > m then begin m := Dat[k]; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m 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 нц для k от 1 до 10 если Dat[k] > m то m := Dat[k] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {12, 15, 17, 15, 14, 12, 10, 13, 14, 15}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] > m) m = Dat[k]; cout << m; return 0; } | |
В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] — данные за первый день, Dat[2] — за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER 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 = 20 FOR k = 1 TO 10 IF Dat(k) < m THEN m = Dat(k) ENDIF NEXT k PRINT m | Dat = [12, 15, 17, 15, 14, 12, 10, 13, 14, 15] m = 20 for k in range (10): if Dat[k] < m: m = Dat[k] print (m)
|
| Паскаль | Алгоритмический язык |
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 := 20; for k := 1 to 10 do if Dat[k] < m then begin m := Dat[k]; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m 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 := 20 нц для k от 1 до 10 если Dat[k] < m то m := Dat[k] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {12, 15, 17, 15, 14, 12, 10, 13, 14, 15}; int m = 20; for (int k = 0; k < 10; k++) if (Dat[k] < m) m = Dat[k]; cout << m; return 0; } | |
В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] — данные за первый день, Dat[2] — за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER 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 IF Dat(k) > 12 THEN m = m + 1 ENDIF NEXT k PRINT m | Dat = [12, 15, 17, 15, 14, 12, 10, 13, 14, 15] m = 0 for k in range (10): if Dat[k] > 12: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
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] > 12 then begin m := m + 1; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m 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 нц для k от 1 до 10 если Dat[k] > 12 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {12, 15, 17, 15, 14, 12, 10, 13, 14, 15}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] > 12) m = m + 1; cout << m; return 0; } | |
В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] — данные за первый день, Dat[2] — за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 2: Dat(2) = 5 Dat(3) = 8: Dat(4) = 5 Dat(5) = 4: Dat(6) = 2 Dat(7) = 0: Dat(8) = 3 Dat(9) = 4: Dat(10) = 5 m = 0 FOR k = 1 TO 10 IF Dat(k) > m THEN m = Dat(k) ENDIF NEXT k PRINT m | Dat = [2, 5, 8, 5, 4, 2, 0, 3, 4, 5] m = 0 for k in range(10): if Dat[k] > m: m = Dat[k] print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 2; Dat[2] := 5; Dat[3] := 8; Dat[4] := 5; Dat[5] := 4; Dat[6] := 2; Dat[7] := 0; Dat[8] := 3; Dat[9] := 4; Dat[10] := 5; m := 0; for k := 1 to 10 do if Dat[k] > m then begin m := Dat[k]; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m Dat[1] := 2 Dat[2] := 5 Dat[3] := 8 Dat[4] := 5 Dat[5] := 4 Dat[6] := 2 Dat[7] := 0 Dat[8] := 3 Dat[9] := 4 Dat[10] := 5 m := 0 нц для k от 1 до 10 если Dat[k] > m то m := Dat[k] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {2, 5, 8, 5, 4, 2, 0, 3, 4, 5}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] > m) m = Dat[k]; cout << m; return 0; } | |
В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] — данные за первый день, Dat[2] — за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 2: Dat(2) = 5 Dat(3) = 7: Dat(4) = 5 Dat(5) = 4: Dat(6) = 2 Dat(7) = 0: Dat(8) = 3 Dat(9) = 4: Dat(10) = 5 m = 10 FOR k = 1 TO 10 IF Dat(k) < m THEN m = Dat(k) ENDIF NEXT k PRINT m | Dat = [2, 5, 7, 5, 4, 2, 0, 3, 4, 5] m = 10 for k in range(10): if Dat[k] < m: m = Dat[k] print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 2; Dat[2] := 5; Dat[3] := 7; Dat[4] := 5; Dat[5] := 4; Dat[6] := 2; Dat[7] := 0; Dat[8] := 3; Dat[9] := 4; Dat[10] := 5; m := 10; for k := 1 to 10 do if Dat[k] < m then begin m := Dat[k]; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m Dat[1] := 2 Dat[2] := 5 Dat[3] := 7 Dat[4] := 5 Dat[5] := 4 Dat[6] := 2 Dat[7] := 0 Dat[8] := 3 Dat[9] := 4 Dat[10] := 5 m := 10 нц для k от 1 до 10 если Dat[k] < m то m := Dat[k] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {2, 5, 7, 5, 4, 2, 0, 3, 4, 5}; int m = 10; for (int k = 0; k < 10; k++) if (Dat[k] < m) m = Dat[k]; cout << m; return 0; } | |
В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] — данные за первый день, Dat[2] — за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 2: Dat(2) = 5 Dat(3) = 7: Dat(4) = 5 Dat(5) = 4: Dat(6) = 2 Dat(7) = 0: Dat(8) = 2 Dat(9) = 4: Dat(10) = 5 m = 0 FOR k = 1 TO 10 IF Dat(k) > 3 THEN m = m + 1 ENDIF NEXT k PRINT m | Dat = [2, 5, 7, 5, 4, 2, 0, 2, 4, 5] m = 0 for k in range(10): if Dat[k] > 3: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 2; Dat[2] := 5; Dat[3] := 7; Dat[4] := 5; Dat[5] := 4; Dat[6] := 2; Dat[7] := 0; Dat[8] := 2; Dat[9] := 4; Dat[10] := 5; m := 0; for k := 1 to 10 do if Dat[k] > 3 then begin m := m + 1; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m Dat[1] := 2 Dat[2] := 5 Dat[3] := 7 Dat[4] := 5 Dat[5] := 4 Dat[6] := 2 Dat[7] := 0 Dat[8] := 2 Dat[9] := 4 Dat[10] := 5 m := 0 нц для k от 1 до 10 если Dat[k] > 3 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {2, 5, 7, 5, 4, 2, 0, 2, 4, 5}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] > 3) m = m + 1; cout << m; return 0; } | |
В таблице Dat представлены данные о количестве голосов, поданных за 10 исполнителей народных песен (Dat[1] — количество голосов, поданных за первого исполнителя, Dat[2] — за второго и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 56: Dat(2) = 70 Dat(3) = 20: Dat(4) = 41 Dat(5) = 14: Dat(6) = 22 Dat(7) = 30: Dat(8) = 12 Dat(9) = 65: Dat(10) = 35 m = 0 FOR k = 1 TO 10 IF Dat(k) > 25 THEN m = m + 1 ENDIF NEXT k PRINT m | Dat = [56, 70, 20, 41, 14, 22, 30, 12, 65, 35] m = 0 for k in range(10): if Dat[k] > 25: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 56; Dat[2] := 70; Dat[3] := 20; Dat[4] := 41; Dat[5] := 14; Dat[6] := 22; Dat[7] := 30; Dat[8] := 12; Dat[9] := 65; Dat[10] := 35; m := 0; for k := 1 to 10 do if Dat[k] > 25 then begin m := m + 1; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m Dat[1] := 56 Dat[2] := 70 Dat[3] := 20 Dat[4] := 41 Dat[5] := 14 Dat[6] := 22 Dat[7] := 30 Dat[8] := 12 Dat[9] := 65 Dat[10] := 35 m := 0 нц для k от 1 до 10 если Dat[k] > 25 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {56, 70, 20, 41, 14, 22, 30, 12, 65, 35}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] > 25) m = m + 1; cout << m; return 0; } | |
В таблице Dat представлены данные о количестве голосов, поданных за 10 исполнителей народных песен (Dat[1] — количество голосов, поданных за первого исполнителя, Dat[2] — за второго и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 56: Dat(2) = 70 Dat(3) = 20: Dat(4) = 41 Dat(5) = 14: Dat(6) = 22 Dat(7) = 30: Dat(8) = 12 Dat(9) = 65: Dat(10) = 35 m = 0 FOR k = 1 TO 10 IF Dat(k) < 35 THEN m = m + 1 ENDIF NEXT k PRINT m | Dat = [56, 70, 20, 41, 14, 22, 30, 12, 65, 35] m = 0 for k in range(10): if Dat[k] < 35: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 56; Dat[2] := 70; Dat[3] := 20; Dat[4] := 41; Dat[5] := 14; Dat[6] := 22; Dat[7] := 30; Dat[8] := 12; Dat[9] := 65; Dat[10] := 35; m := 0; for k := 1 to 10 do if Dat[k] < 35 then begin m := m + 1; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m Dat[1] := 56 Dat[2] := 70 Dat[3] := 20 Dat[4] := 41 Dat[5] := 14 Dat[6] := 22 Dat[7] := 30 Dat[8] := 12 Dat[9] := 65 Dat[10] := 35 m := 0 нц для k от 1 до 10 если Dat[k] < 35 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {56, 70, 20, 41, 14, 22, 30, 12, 65, 35}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] < 35) m = m + 1; cout << m; return 0; } | |
В таблице Dat представлены данные о количестве голосов, поданных за 10 исполнителей народных песен (Dat[1] — количество голосов, поданных за первого исполнителя, Dat[2] — за второго и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 56: Dat(2) = 70 Dat(3) = 20: Dat(4) = 41 Dat(5) = 14: Dat(6) = 22 Dat(7) = 30: Dat(8) = 12 Dat(9) = 65: Dat(10) = 35 m = 100 FOR k = 1 TO 10 IF Dat(k) < m THEN m = Dat(k) ENDIF NEXT k PRINT m | Dat = [56, 70, 20, 41, 14, 22, 30, 12, 65, 35] m = 100 for k in range(10): if Dat[k] < m: m = Dat[k] print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 56; Dat[2] := 70; Dat[3] := 20; Dat[4] := 41; Dat[5] := 14; Dat[6] := 22; Dat[7] := 30; Dat[8] := 12; Dat[9] := 65; Dat[10] := 35; m := 100; for k := 1 to 10 do if Dat[k] < m then begin m := Dat[k]; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m Dat[1] := 56 Dat[2] := 70 Dat[3] := 20 Dat[4] := 41 Dat[5] := 14 Dat[6] := 22 Dat[7] := 30 Dat[8] := 12 Dat[9] := 65 Dat[10] := 35 m := 100 нц для k от 1 до 10 если Dat[k] < m то m := Dat[k] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {56, 70, 20, 41, 14, 22, 30, 12, 65, 35}; int m = 100; for (int k = 0; k < 10; k++) if (Dat[k] < m) m = Dat[k]; cout << m; return 0; } | |
В таблице Dat представлены данные о количестве голосов, поданных за 10 исполнителей народных песен (Dat[1] — количество голосов, поданных за первого исполнителя, Dat[2] — за второго и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 56: Dat(2) = 70 Dat(3) = 20: Dat(4) = 41 Dat(5) = 14: Dat(6) = 22 Dat(7) = 30: Dat(8) = 12 Dat(9) = 65: Dat(10) = 35 m = 0 FOR k = 1 TO 10 IF Dat(k) > m THEN m = Dat(k) ENDIF NEXT k PRINT m | Dat = [56, 70, 20, 41, 14, 22, 30, 12, 65, 35] m = 0 for k in range(10): if Dat[k] > m: m = Dat[k] print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 56; Dat[2] := 70; Dat[3] := 20; Dat[4] := 41; Dat[5] := 14; Dat[6] := 22; Dat[7] := 30; Dat[8] := 12; Dat[9] := 65; Dat[10] := 35; m := 0; for k := 1 to 10 do if Dat[k] > m then begin m := Dat[k]; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m Dat[1] := 56 Dat[2] := 70 Dat[3] := 20 Dat[4] := 41 Dat[5] := 14 Dat[6] := 22 Dat[7] := 30 Dat[8] := 12 Dat[9] := 65 Dat[10] := 35 m := 0 нц для k от 1 до 10 если Dat[k] > m то m := Dat[k] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {56, 70, 20, 41, 14, 22, 30, 12, 65, 35}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] > m) m = Dat[k]; cout << m; return 0; } | |
В таблице Dat представлены данные о количестве голосов, поданных за 10 исполнителей народных песен (Dat[1] — количество голосов, поданных за первого исполнителя, Dat[2] — за второго и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 16: Dat(2) = 20 Dat(3) = 20: Dat(4) = 41 Dat(5) = 14: Dat(6) = 21 Dat(7) = 28: Dat(8) = 12 Dat(9) = 15: Dat(10) = 35 m = 0 FOR k = 1 TO 10 IF Dat(k) < 25 THEN m = m + 1 ENDIF NEXT k PRINT m | Dat = [16, 20, 20, 41, 14, 21, 28, 12, 15, 35] m = 0 for k in range(10): if Dat[k] < 25: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 16; Dat[2] := 20; Dat[3] := 20; Dat[4] := 41; Dat[5] := 14; Dat[6] := 21; Dat[7] := 28; Dat[8] := 12; Dat[9] := 15; Dat[10] := 35; m := 0; for k := 1 to 10 do if Dat[k] < 25 then begin m := m + 1; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m Dat[1] := 16 Dat[2] := 20 Dat[3] := 20 Dat[4] := 41 Dat[5] := 14 Dat[6] := 21 Dat[7] := 28 Dat[8] := 12 Dat[9] := 15 Dat[10] := 35 m := 0 нц для k от 1 до 10 если Dat[k] < 25 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {16, 20, 20, 41, 14, 21, 28, 12, 15, 35}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] < 25) m = m + 1; cout << m; return 0; } | |
В таблице Dat представлены данные о количестве голосов, поданных за 10 исполнителей народных песен (Dat[1] — количество голосов, поданных за первого исполнителя, Dat[2] — за второго и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 16: Dat(2) = 20 Dat(3) = 20: Dat(4) = 41 Dat(5) = 14: Dat(6) = 21 Dat(7) = 28: Dat(8) = 11 Dat(9) = 15: Dat(10) = 35 m = 50 FOR k = 1 TO 10 IF Dat(k) < m THEN m = Dat(k) ENDIF NEXT k PRINT m | Dat = [16, 20, 20, 41, 14, 21, 28, 11, 15, 35] m = 50 for k in range(10): if Dat[k] < m: m = Dat[k] print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 16; Dat[2] := 20; Dat[3] := 20; Dat[4] := 41; Dat[5] := 14; Dat[6] := 21; Dat[7] := 28; Dat[8] := 11; Dat[9] := 15; Dat[10] := 35; m := 50; for k := 1 to 10 do if Dat[k] < m then begin m := Dat[k]; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m Dat[1] := 16 Dat[2] := 20 Dat[3] := 20 Dat[4] := 41 Dat[5] := 14 Dat[6] := 21 Dat[7] := 28 Dat[8] := 11 Dat[9] := 15 Dat[10] := 35 m := 50 нц для k от 1 до 10 если Dat[k] < m то m := Dat[k] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {16, 20, 20, 41, 14, 21, 28, 11, 15, 35}; int m = 50; for (int k = 0; k < 10; k++) if (Dat[k] < m) m = Dat[k]; cout << m; return 0; } | |
В таблице Dat представлены данные о количестве голосов, поданных за 10 исполнителей народных песен (Dat[1] — количество голосов, поданных за первого исполнителя, Dat[2] — за второго и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 16: Dat(2) = 20 Dat(3) = 20: Dat(4) = 41 Dat(5) = 14: Dat(6) = 21 Dat(7) = 28: Dat(8) = 12 Dat(9) = 15: Dat(10) = 35 m = 0 FOR k = 1 TO 10 IF Dat(k) > m THEN m = Dat(k) ENDIF NEXT k PRINT m | Dat = [16, 20, 20, 41, 14, 21, 28, 12, 15, 35] m = 0 for k in range(10): if Dat[k] > m: m = Dat[k] print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 16; Dat[2] := 20; Dat[3] := 20; Dat[4] := 41; Dat[5] := 14; Dat[6] := 21; Dat[7] := 28; Dat[8] := 12; Dat[9] := 15; Dat[10] := 35; m := 0; for k := 1 to 10 do if Dat[k] > m then begin m := Dat[k]; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m Dat[1] := 16 Dat[2] := 20 Dat[3] := 20 Dat[4] := 41 Dat[5] := 14 Dat[6] := 21 Dat[7] := 28 Dat[8] := 12 Dat[9] := 15 Dat[10] := 35 m := 0 нц для k от 1 до 10 если Dat[k] > m то m := Dat[k] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {16, 20, 20, 41, 14, 21, 28, 12, 15, 35}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] > m) m = Dat[k]; cout << m; return 0; } | |
В таблице Dat хранятся данные о количестве сделанных заданий учениками (Dat[1] заданий сделал первый ученик, Dat[2] — второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k, m, n AS INTEGER Dat(1) = 7: Dat(2) = 9 Dat(3) = 10: Dat(4) = 5 Dat(5) = 6: Dat(6) = 7 Dat(7) = 9: Dat(8) = 8 Dat(9) = 6: Dat(10) = 9 m = 10; n = 0 FOR k = 1 TO 10 IF Dat(k) < m THEN m = Dat(k) n = k ENDIF NEXT k PRINT n | Dat = [7, 9, 10, 5, 6, 7, 9, 8, 6, 9] m = 10 n = 0 for k in range(0,10): if Dat[k] < m: m = Dat[k] n = k + 1 print (n)
|
| Паскаль | Алгоритмический язык |
Var k, m, n: integer; Dat: array[1..10] of integer; Begin Dat[1] := 7; Dat[2] := 9; Dat[3] := 10; Dat[4] := 5; Dat[5] := 6; Dat[6] := 7; Dat[7] := 9; Dat[8] := 8; Dat[9] := 6; Dat[10] := 9; m := 10; n := 0; for k := 1 to 10 do if Dat[k] < m then begin m := Dat[k]; n := k; end; writeln(n); End.
| алг нач целтаб Dat[1:10] цел k, m, n Dat[1] := 7 Dat[2] := 9 Dat[3] := 10 Dat[4] := 5 Dat[5] := 6 Dat[6] := 7 Dat[7] := 9 Dat[8] := 8 Dat[9] := 6 Dat[10] := 9 m := 10 n := 0 нц для k от 1 до 10 если Dat[k] < m то m := Dat[k] n := k все кц вывод n кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {7, 9, 10, 5, 6, 7, 9, 8, 6, 9}; int m = 10; int n = 0; for (int k = 0; k < 10; k++) if (Dat[k] < m) { m = Dat[k]; n = k + 1; } cout << n; return 0; } | |
В таблице Dat хранятся данные о количестве учеников в классах (Dat[1] — количество учеников в первом классе, Dat[2] — во втором и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(11) AS INTEGER DIM k, m AS INTEGER Dat(1) = 20: Dat(2) = 27 Dat(3) = 19: Dat(4) = 28 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 IF Dat(k) < 25 THEN m = Dat(k) ENDIF NEXT k PRINT m | Dat = [20, 27, 19, 28, 26, 22, 24, 28, 26, 21, 27] m = 0 for k in range(11): if Dat[k] < 25: m = Dat[k] print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..11] of integer; Begin Dat[1] := 20; Dat[2] := 27; Dat[3] := 19; Dat[4] := 28; 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 Dat[k] < 25 then begin m := Dat[k]; end; writeln(m); End.
| алг нач целтаб Dat[1:11] цел k, m Dat[1] := 20 Dat[2] := 27 Dat[3] := 19 Dat[4] := 28 Dat[5] := 26 Dat[6] := 22 Dat[7] := 24 Dat[8] := 28 Dat[9] := 26 Dat[10] := 21 Dat[11] := 27 m := 0 нц для k от 1 до 11 если Dat[k] < 25 то m := Dat[k] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[11] = {20, 27, 19, 28, 26, 22, 24, 28, 26, 21, 27}; int m = 0; for (int k = 0; k < 11; k++) if (Dat[k] < 25) { m = Dat[k]; } cout << m; return 0; } | |
В таблице Dat хранятся данные о количестве учеников в классах (Dat[1] — количество учеников в первом классе, Dat[2] — во втором и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(11) AS INTEGER DIM k, m AS INTEGER 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 IF Dat(k) > 22 THEN m = m + 1 ENDIF NEXT k PRINT m | Dat = [20, 25, 19, 25, 26, 22, 24, 28, 26, 21, 27] m = 0 for k in range(11): if Dat[k] > 22: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
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 Dat[k] > 22 then begin m := m + 1; end; writeln(m); End.
| алг нач целтаб 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 := 0 нц для k от 1 до 11 если Dat[k] > 22 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[11] = {20, 25, 19, 25, 26, 22, 24, 28, 26, 21, 27}; int m = 0; for (int k = 0; k < 11; k++) if (Dat[k] > 22) { m = m + 1; } cout << m; return 0; } | |
В таблице Dat хранятся оценки (по десятибалльной шкале) студента по программированию за 8 прошедших с начала учёбы семестров (Dat[1] — оценка за первый семестр, Dat[2] — за второй и т. д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти алгоритмических языках.
| Бейсик | Python |
|---|---|
DIM Dat(8) AS INTEGER DIM k, m, term AS INTEGER Dat(1) = 7: Dat(2) = 7 Dat(3) = 6: Dat(4) = 8 Dat(5) = 4: Dat(6) = 5 Dat(7) = 4: Dat(8) = 7 m = Dat(1); term = 1 FOR k = 2 TO 8 IF Dat(k) < m THEN m = Dat(k) term = k ENDIF NEXT k PRINT term | Dat = [7, 7, 6, 8, 4, 5, 4, 7] m = Dat[0] term = 1 for k in range(1, 8): if Dat[k] < m: m = Dat[k] term = k print (term)
|
| Паскаль | Алгоритмический язык |
Var k, m, term: integer; Dat: array[1..8] of integer; Begin Dat[1] := 7; Dat[2] := 7; Dat[3] := 6; Dat[4] := 8; Dat[5] := 4; Dat[6] := 5; Dat[7] := 4; Dat[8] := 7; m := Dat[1]; term := 1; for k := 2 to 8 do if Dat[k] < m then begin m := Dat[k]; term := k; end; writeln(term); End.
| алг нач целтаб Dat[1:8] цел k, m, term Dat[1] := 7 Dat[2] := 7 Dat[3] := 6 Dat[4] := 8 Dat[5] := 4 Dat[6] := 5 Dat[7] := 4 Dat[8] := 7 m := Dat[1] term := 1 нц для k от 2 до 8 если Dat[k] < m то m := Dat[k] term := k все кц вывод term кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[8] = {7, 7, 6, 8, 4, 5, 4, 7}; int m = Dat[0]; int term = 1 for (int k = 1; k < 8; k++) if (Dat[k] < m) { m = Dat[k]; term = k; } cout << term; return 0; } | |
В таблице Dat хранятся оценки (по десятибалльной шкале) студента по программированию за 8 прошедших с начала учёбы семестров (Dat[1] — оценка за первый семестр, Dat[2] — за второй и т. д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти алгоритмических языках.
| Бейсик | Python |
|---|---|
DIM Dat(8) AS INTEGER DIM k, m, term AS INTEGER Dat(1) = 7: Dat(2) = 7 Dat(3) = 6: Dat(4) = 8 Dat(5) = 4: Dat(6) = 5 Dat(7) = 8: Dat(8) = 7 m = Dat(1); term = 1 FOR k = 2 TO 8 IF Dat(k) > m THEN m = Dat(k) term = k ENDIF NEXT k PRINT term | Dat = [7, 7, 6, 8, 4, 5, 8, 7] m = Dat[0] term = 1 for k in range(1, 8): if Dat[k] > m: m = Dat[k] term = k + 1 print (term)
|
| Паскаль | Алгоритмический язык |
Var k, m, term: integer; Dat: array[1..8] of integer; Begin Dat[1] := 7; Dat[2] := 7; Dat[3] := 6; Dat[4] := 8; Dat[5] := 4; Dat[6] := 5; Dat[7] := 8; Dat[8] := 7; m := Dat[1]; term := 1; for k := 2 to 8 do if Dat[k] > m then begin m := Dat[k]; term := k; end; writeln(term); End.
| алг нач целтаб Dat[1:8] цел k, m, term Dat[1] := 7 Dat[2] := 7 Dat[3] := 6 Dat[4] := 8 Dat[5] := 4 Dat[6] := 5 Dat[7] := 8 Dat[8] := 7 m := Dat[1] term := 1 нц для k от 2 до 8 если Dat[k] > m то m := Dat[k] term := k все кц вывод term кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[8] = {7, 7, 6, 8, 4, 5, 8, 7}; int m = Dat[0]; int term = 1 for (int k = 1; k < 8; k++) if (Dat[k] > m) { m = Dat[k]; term = k + 1; } cout << term; return 0; } | |
В таблице Dat хранятся данные о количестве краткосрочных командировок, в которые приходилось ездить сотруднику за последний год (Dat[1] — количество командировок в январе, Dat[2] — количество командировок в феврале и т. д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти алгоритмических языках.
| Бейсик | Python |
|---|---|
DIM Dat(12) AS INTEGER DIM k, m, month AS INTEGER Dat(1) = 5: Dat(2) = 5 Dat(3) = 6: Dat(4) = 8 Dat(5) = 4: Dat(6) = 5 Dat(7) = 4: Dat(8) = 7 Dat(9) = 4: Dat(10) = 4 Dat(11) = 8: Dat(12) = 7 m = Dat(1); month = 1 FOR k = 2 TO 12 IF Dat(k) <= m THEN m = Dat(k) month = k ENDIF NEXT k PRINT month | Dat = [5, 5, 6, 8, 4, 5, 4, 7, 4, 4, 8, 7] m = Dat[0] month = 1 for k in range(1, 12): if Dat[k] <= m: m = Dat[k] month = k + 1 print (month)
|
| Паскаль | Алгоритмический язык |
Var k, m, month: integer; Dat: array[1..12] of integer; Begin Dat[1] := 5; Dat[2] := 5; Dat[3] := 6; Dat[4] := 8; Dat[5] := 4; Dat[6] := 5; Dat[7] := 4; Dat[8] := 7; Dat[9] := 4; Dat[10] := 4; Dat[11] := 8; Dat[12] := 7; m := Dat[1]; month := 1; for k := 2 to 12 do if Dat[k] <= m then begin m := Dat[k]; month := k; end; writeln(month); End.
| алг нач целтаб Dat[1:12] цел k, m, month Dat[1] := 5 Dat[2] := 5 Dat[3] := 6 Dat[4] := 8 Dat[5] := 4 Dat[6] := 5 Dat[7] := 4 Dat[8] := 7 Dat[9] := 4 Dat[10] := 4 Dat[11] := 8 Dat[12] := 7 m := Dat[1] month := 1 нц для k от 2 до 12 если Dat[k] <= m то m := Dat[k] month := k все кц вывод month кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[12] = {5, 5, 6, 8, 4, 5, 4, 7, 4, 4, 8, 7}; int m = Dat[0]; int month = 1; for (int k = 1; k < 12; k++) if (Dat[k] <= m) { m = Dat[k]; month = k + 1; } cout << month; return 0; } | |
В таблице Dat хранятся данные о количестве краткосрочных командировок, в которые приходилось ездить сотруднику за последний год (Dat[1] — количество командировок в январе, Dat[2] — количество командировок в феврале и т. д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти алгоритмических языках.
| Бейсик | Python |
|---|---|
DIM Dat(12) AS INTEGER DIM k, m, month AS INTEGER Dat(1) = 2: Dat(2) = 5 Dat(3) = 6: Dat(4) = 8 Dat(5) = 8: Dat(6) = 5 Dat(7) = 3: Dat(8) = 7 Dat(9) = 4: Dat(10) = 4 Dat(11) = 8: Dat(12) = 7 m = Dat(1); month = 1 FOR k = 2 TO 12 IF Dat(k) >= m THEN m = Dat(k) month = k ENDIF NEXT k PRINT month | Dat = [2, 5, 6, 8, 8, 5, 3, 7, 4, 4, 8, 7] m = Dat[0] month = 1 for k in range(1, 12): if Dat[k] >= m: m = Dat[k] month = k + 1 print (month)
|
| Паскаль | Алгоритмический язык |
Var k, m, month: integer; Dat: array[1..12] of integer; Begin Dat[1] := 2; Dat[2] := 5; Dat[3] := 6; Dat[4] := 8; Dat[5] := 8; Dat[6] := 5; Dat[7] := 3; Dat[8] := 7; Dat[9] := 4; Dat[10] := 4; Dat[11] := 8; Dat[12] := 7; m := Dat[1]; month := 1; for k := 2 to 12 do if Dat[k] >= m then begin m := Dat[k]; month := k; end; writeln(month); End.
| алг нач целтаб Dat[1:12] цел k, m, month Dat[1] := 2 Dat[2] := 5 Dat[3] := 6 Dat[4] := 8 Dat[5] := 8 Dat[6] := 5 Dat[7] := 3 Dat[8] := 7 Dat[9] := 4 Dat[10] := 4 Dat[11] := 8 Dat[12] := 7 m := Dat[1] month := 1 нц для k от 2 до 12 если Dat[k] >= m то m := Dat[k] month := k все кц вывод month кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[12] = {2, 5, 6, 8, 8, 5, 3, 7, 4, 4, 8, 7}; int m = Dat[0]; int month = 1; for (int k = 1; k < 12; k++) if (Dat[k] >= m) { m = Dat[k]; month = k + 1; } cout << month; return 0; } | |
В таблице Dat хранятся данные о количестве детских праздников, которые проводило кафе за последний год (Dat[1] — количество детских праздников в январе, Dat[2] — количество праздников в феврале и т. д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти алгоритмических языках.
| Бейсик | Python |
|---|---|
DIM Dat(12) AS INTEGER DIM k, m, month AS INTEGER Dat(1) = 2: Dat(2) = 8 Dat(3) = 6: Dat(4) = 3 Dat(5) = 8: Dat(6) = 2 Dat(7) = 3: Dat(8) = 7 Dat(9) = 4: Dat(10) = 4 Dat(11) = 8: Dat(12) = 7 m = Dat(1); month = 1 FOR k = 2 TO 6 IF Dat(k) > m THEN m = Dat(k) month = k ENDIF NEXT k PRINT month | Dat = [2, 8, 6, 3, 8, 2, 3, 7, 4, 4, 8, 7] m = Dat[0] month = 1 for k in range(1, 7): if Dat[k] > m: m = Dat[k] month = k + 1 print (month)
|
| Паскаль | Алгоритмический язык |
Var k, m, month: integer; Dat: array[1..12] of integer; Begin Dat[1] := 2; Dat[2] := 8; Dat[3] := 6; Dat[4] := 3; Dat[5] := 8; Dat[6] := 2; Dat[7] := 3; Dat[8] := 7; Dat[9] := 4; Dat[10] := 4; Dat[11] := 8; Dat[12] := 7; m := Dat[1]; month := 1; for k := 2 to 6 do if Dat[k] > m then begin m := Dat[k]; month := k; end; writeln(month); End.
| алг нач целтаб Dat[1:12] цел k, m, month Dat[1] := 2 Dat[2] := 8 Dat[3] := 6 Dat[4] := 3 Dat[5] := 8 Dat[6] := 2 Dat[7] := 3 Dat[8] := 7 Dat[9] := 4 Dat[10] := 4 Dat[11] := 8 Dat[12] := 7 m := Dat[1] month := 1 нц для k от 2 до 6 если Dat[k] > m то m := Dat[k] month := k все кц вывод month кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[12] = {2, 8, 6, 3, 8, 2, 3, 7, 4, 4, 8, 7}; int m = Dat[0]; int month = 1; for (int k = 1; k < 7; k++) if (Dat[k] > m) { m = Dat[k]; month = k + 1; } cout << month; return 0; } | |
В таблице Dat хранятся данные о количестве детских праздников, которые проводило кафе за последний год (Dat[1] — количество детских праздников в январе, Dat[2] — количество праздников в феврале и т. д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти алгоритмических языках.
| Бейсик | Python |
|---|---|
DIM Dat(12) AS INTEGER DIM k, m, month AS INTEGER Dat(1) = 2: Dat(2) = 8 Dat(3) = 6: Dat(4) = 3 Dat(5) = 8: Dat(6) = 2 Dat(7) = 3: Dat(8) = 7 Dat(9) = 8: Dat(10) = 3 Dat(11) = 8: Dat(12) = 7 m = Dat(1); month = 1 FOR k = 8 TO 12 IF Dat(k) > m THEN m = Dat(k) month = k ENDIF NEXT k PRINT month | Dat = [2, 8, 6, 3, 8, 2, 3, 7, 8, 3, 8, 7] m = Dat[0] month = 1 for k in range(7, 12): if Dat[k] > m: m = Dat[k] month = k + 1 print (month)
|
| Паскаль | Алгоритмический язык |
Var k, m, month: integer; Dat: array[1..12] of integer; Begin Dat[1] := 2; Dat[2] := 8; Dat[3] := 6; Dat[4] := 3; Dat[5] := 8; Dat[6] := 2; Dat[7] := 3; Dat[8] := 7; Dat[9] := 8; Dat[10] := 3; Dat[11] := 8; Dat[12] := 7; m := Dat[1]; month := 1; for k := 8 to 12 do if Dat[k] > m then begin m := Dat[k]; month := k; end; writeln(month); End.
| алг нач целтаб Dat[1:12] цел k, m, month Dat[1] := 2 Dat[2] := 8 Dat[3] := 6 Dat[4] := 3 Dat[5] := 8 Dat[6] := 2 Dat[7] := 3 Dat[8] := 7 Dat[9] := 8 Dat[10] := 3 Dat[11] := 8 Dat[12] := 7 m := Dat[1] month := 1 нц для k от 8 до 12 если Dat[k] > m то m := Dat[k] month := k все кц вывод month кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[12] = {2, 8, 6, 3, 8, 2, 3, 7, 8, 3, 8, 7}; int m = Dat[0]; int month = 1; for (int k = 7; k < 12; k++) if (Dat[k] > m) { m = Dat[k]; month = k + 1; } cout << month; return 0; } | |
В таблице Dat хранятся данные о количестве поездов, отправляющихся с центрального вокзала города на юг в первой декаде июля (Dat[1] — количество поездов первого числа, Dat[2] — количество поездов второго числа и т. д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти алгоритмических языках.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k, m, day AS INTEGER Dat(1) = 2: Dat(2) = 6 Dat(3) = 3: Dat(4) = 5 Dat(5) = 4: Dat(6) = 4 Dat(7) = 5: Dat(8) = 3 Dat(9) = 6: Dat(10) = 2 m = Dat(1); day = 1 FOR k = 2 TO 10 IF Dat(k) > m THEN m = Dat(k) day = k ENDIF NEXT k PRINT day | Dat = [2, 6, 3, 5, 4, 4, 5, 3, 6, 2] m = Dat[0] day = 1 for k in range(1, 10): if Dat[k] > m: m = Dat[k] day = k + 1 print (day)
|
| Паскаль | Алгоритмический язык |
Var k, m, day: integer; Dat: array[1..10] of integer; Begin Dat[1] := 2; Dat[2] := 6; Dat[3] := 3; Dat[4] := 5; Dat[5] := 4; Dat[6] := 4; Dat[7] := 5; Dat[8] := 3; Dat[9] := 6; Dat[10] := 2; m := Dat[1]; day := 1; for k := 2 to 10 do if Dat[k] > m then begin m := Dat[k]; day := k; end; writeln(day); End.
| алг нач целтаб Dat[1:10] цел k, m, day Dat[1] := 2 Dat[2] := 6 Dat[3] := 3 Dat[4] := 5 Dat[5] := 4 Dat[6] := 4 Dat[7] := 5 Dat[8] := 3 Dat[9] := 6 Dat[10] := 2 m := Dat[1] day := 1 нц для k от 2 до 10 если Dat[k] > m то m := Dat[k] day := k все кц вывод day кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {2, 6, 3, 5, 4, 4, 5, 3, 6, 2}; int m = Dat[0]; int day = 1; for (int k = 1; k < 10; k++) if (Dat[k] > m) { m = Dat[k]; day = k + 1; } cout << day; return 0; } | |
В таблице Dat хранятся данные о количестве поездов, отправляющихся с центрального вокзала города на юг в первой декаде июля (Dat[1] — количество поездов первого числа, Dat[2] — количество поездов второго числа и т. д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти алгоритмических языках.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k, m, day AS INTEGER Dat(1) = 6: Dat(2) = 2 Dat(3) = 5: Dat(4) = 3 Dat(5) = 4: Dat(6) = 4 Dat(7) = 3: Dat(8) = 5 Dat(9) = 2: Dat(10) = 6 m = Dat(1); day = 1 FOR k = 2 TO 10 IF Dat(k) < m THEN m = Dat(k) day = k ENDIF NEXT k PRINT day | Dat = [6, 2, 5, 3, 4, 4, 3, 5, 2, 6] m = Dat[0] day = 1 for k in range(1, 10): if Dat[k] < m: m = Dat[k] day = k + 1 print (day)
|
| Паскаль | Алгоритмический язык |
Var k, m, day: integer; Dat: array[1..10] of integer; Begin Dat[1] := 6; Dat[2] := 2; Dat[3] := 5; Dat[4] := 3; Dat[5] := 4; Dat[6] := 4; Dat[7] := 3; Dat[8] := 5; Dat[9] := 2; Dat[10] := 6; m := Dat[1]; day := 1; for k := 2 to 10 do if Dat[k] < m then begin m := Dat[k]; day := k; end; writeln(day); End.
| алг нач целтаб Dat[1:10] цел k, m, day Dat[1] := 6 Dat[2] := 2 Dat[3] := 5 Dat[4] := 3 Dat[5] := 4 Dat[6] := 4 Dat[7] := 3 Dat[8] := 5 Dat[9] := 2 Dat[10] := 6 m := Dat[1] day := 1 нц для k от 2 до 10 если Dat[k] < m то m := Dat[k] day := k все кц вывод day кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {6, 2, 5, 3, 4, 4, 3, 5, 2, 6}; int m = Dat[0]; int day = 1; for (int k = 1; k < 10; k++) if (Dat[k] < m) { m = Dat[k]; day = k + 1; } cout << day; return 0; } | |
В таблице Dat хранятся данные о количестве самолётов, отправляющихся из аэропорта города на юг в первой декаде августа (Dat[1] — количество самолётов первого числа, Dat[2] — количество самолётов второго числа и т. д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти алгоритмических языках.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k, m, day AS INTEGER Dat(1) = 2: Dat(2) = 2 Dat(3) = 3: Dat(4) = 3 Dat(5) = 4: Dat(6) = 4 Dat(7) = 5: Dat(8) = 5 Dat(9) = 6: Dat(10) = 6 m = Dat(1); day = 1 FOR k = 2 TO 10 IF Dat(k) >= m THEN m = Dat(k) day = k ENDIF NEXT k PRINT day | Dat = [2, 2, 3, 3, 4, 4, 5, 5, 6, 6] m = Dat[0] day = 1 for k in range(1, 10): if Dat[k] >= m: m = Dat[k] day = k + 1 print (day)
|
| Паскаль | Алгоритмический язык |
Var k, m, day: integer; Dat: array[1..10] of integer; Begin Dat[1] := 2; Dat[2] := 2; Dat[3] := 3; Dat[4] := 3; Dat[5] := 4; Dat[6] := 4; Dat[7] := 5; Dat[8] := 5; Dat[9] := 6; Dat[10] := 6; m := Dat[1]; day := 1; for k := 2 to 10 do if Dat[k] >= m then begin m := Dat[k]; day := k; end; writeln(day); End.
| алг нач целтаб Dat[1:10] цел k, m, day Dat[1] := 2 Dat[2] := 2 Dat[3] := 3 Dat[4] := 3 Dat[5] := 4 Dat[6] := 4 Dat[7] := 5 Dat[8] := 5 Dat[9] := 6 Dat[10] := 6 m := Dat[1] day := 1 нц для k от 2 до 10 если Dat[k] >= m то m := Dat[k] day := k все кц вывод day кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {2, 2, 3, 3, 4, 4, 5, 5, 6, 6}; int m = Dat[0]; int day = 1; for (int k = 1; k < 10; k++) if (Dat[k] >= m) { m = Dat[k]; day = k + 1; } cout << day; return 0; } | |
В таблице Dat хранятся данные о количестве самолётов, отправляющихся из аэропорта города на юг в первой декаде августа (Dat[1] — количество самолётов первого числа, Dat[2] — количество самолётов второго числа и т. д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти алгоритмических языках.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k, m, day AS INTEGER Dat(1) = 2: Dat(2) = 2 Dat(3) = 3: Dat(4) = 3 Dat(5) = 2: Dat(6) = 2 Dat(7) = 5: Dat(8) = 5 Dat(9) = 6: Dat(10) = 6 m = Dat(1); day = 1 FOR k = 2 TO 10 IF Dat(k) <= m THEN m = Dat(k) day = k ENDIF NEXT k PRINT day | Dat = [2, 2, 3, 3, 2, 2, 5, 5, 6, 6] m = Dat[0] day = 1 for k in range(1, 10): if Dat[k] <= m: m = Dat[k] day = k + 1 print (day)
|
| Паскаль | Алгоритмический язык |
Var k, m, day: integer; Dat: array[1..10] of integer; Begin Dat[1] := 2; Dat[2] := 2; Dat[3] := 3; Dat[4] := 3; Dat[5] := 2; Dat[6] := 2; Dat[7] := 5; Dat[8] := 5; Dat[9] := 6; Dat[10] := 6; m := Dat[1]; day := 1; for k := 2 to 10 do if Dat[k] <= m then begin m := Dat[k]; day := k; end; writeln(day); End.
| алг нач целтаб Dat[1:10] цел k, m, day Dat[1] := 2 Dat[2] := 2 Dat[3] := 3 Dat[4] := 3 Dat[5] := 2 Dat[6] := 2 Dat[7] := 5 Dat[8] := 5 Dat[9] := 6 Dat[10] := 6 m := Dat[1] day := 1 нц для k от 2 до 10 если Dat[k] <= m то m := Dat[k] day := k все кц вывод day кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {2, 2, 3, 3, 2, 2, 5, 5, 6, 6}; int m = Dat[0]; int day = 1; for (int k = 1; k < 10; k++) if (Dat[k] <= m) { m = Dat[k]; day = k + 1; } cout << day; return 0; } | |
В таблице Work хранятся данные о количестве заказов, принятых фирмой «Алоэ» с первого по 15 ноября. (Work[1] − число заказов, принятых 1 ноября, Work[2] − 2 ноября и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования:
| Бейсик | Python |
|---|---|
DIM Work(15) AS INTEGER DIM k,m AS INTEGER Work(1) = 5: Work(2) = 4 Work(3) = 5: Work(4) = 7 Work(5) = 6: Work(6) = 12 Work(7) = 7: Work(8) = 3 Work(9) = 9: Work(10) = 7 Work(11) = 0: Work(12) = 9 Work(13) = 1: Work(14) = 0 Work(15) = 8 m = 0 FOR k = 1 TO 15 IF Work(k) < 7 THEN m = m + 1 ENDIF NEXT k PRINT m | Work = [5, 4, 5, 7, 6, 12, 7, 3, 9, 7, 0, 9, 1, 0, 8] m = 0 for k in range(15): if Work[k] < 7: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Work: array[1..15] of integer; Begin Work[1]:=5; Work[2]:=4; Work[3]:=5; Work[4]:=7; Work[5]:=6; Work[6]:=12; Work[7]:=7; Work[8]:=3; Work[9]:=9; Work[10]:=7; Work[11]:=0; Work[12]:=9; Work[13]:=1; Work[14]:=0; Work[15]:=8; m := 0; for k := 1 to 15 do if Work[k] < 7 then begin m := m + 1; end; writeln(m); End.
| алг нач целтаб Work[1:15] цел k, m Work[1] := 5 Work[2] := 4 Work[3] := 5 Work[4] := 7 Work[5] := 6 Work[6] := 12 Work[7] := 7 Work[8] := 3 Work[9] := 9 Work[10] := 7 Work[11] := 0 Work[12] := 9 Work[13] := 1 Work[14] := 0 Work[15] := 8 m := 0 нц для k от 1 до 15 если Work[k] < 7 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Work[15] = {5, 4, 5, 7, 6, 12, 7, 3, 9, 7, 0, 9, 1, 0, 8}; int m = 0; for (int k = 0; k < 15; k++) if (Work[k] < 7) m = m + 1; cout << m; return 0; } | |
В таблице Work хранятся данные о количестве заказов, принятых фирмой «Конфетти» с первого по 15 декабря. (Work[1] − число заказов, принятых 1 декабря, Work[2] − 2 декабря и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования:
| Бейсик | Python |
|---|---|
DIM Work(15) AS INTEGER DIM k,m AS INTEGER Work(1) = 5: Work(2) = 4 Work(3) = 5: Work(4) = 7 Work(5) = 6: Work(6) = 12 Work(7) = 7: Work(8) = 3 Work(9) = 9: Work(10) = 7 Work(11) = 0: Work(12) = 9 Work(13) = 1: Work(14) = 0 Work(15) = 8 m = 0 FOR k = 1 TO 15 IF Work(k) > 6 THEN m = m + 1 ENDIF NEXT k PRINT m | Work = [5, 4, 5, 7, 6, 12, 7, 3, 9, 7, 0, 9, 1, 0, 8] m = 0 for k in range(15): if Work[k] > 6: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Work: array[1..15] of integer; Begin Work[1]:=5; Work[2]:=4; Work[3]:=5; Work[4]:=7; Work[5]:=6; Work[6]:=12; Work[7]:=7; Work[8]:=3; Work[9]:=9; Work[10]:=7; Work[11]:=0; Work[12]:=9; Work[13]:=1; Work[14]:=0; Work[15]:=8; m := 0; for k := 1 to 15 do if Work[k] > 6 then begin m := m + 1; end; writeln(m); End.
| алг нач целтаб Work[1:15] цел k, m Work[1] := 5 Work[2] := 4 Work[3] := 5 Work[4] := 7 Work[5] := 6 Work[6] := 12 Work[7] := 7 Work[8] := 3 Work[9] := 9 Work[10] := 7 Work[11] := 0 Work[12] := 9 Work[13] := 1 Work[14] := 0 Work[15] := 8 m := 0 нц для k от 1 до 15 если Work[k] > 6 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Work[15] = {5, 4, 5, 7, 6, 12, 7, 3, 9, 7, 0, 9, 1, 0, 8}; int m = 0; for (int k = 0; k < 15; k++) if (Work[k] > 6) m = m + 1; cout << m; return 0; } | |
В таблице Tur хранятся данные о количестве ребят, ходивших в поход вместе с туристическим клубом «Полянка». (Tur[1] — число ребят в 2001 году, Tur[2] — в 2002 году и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования:
| Бейсик | Python |
|---|---|
DIM Tur(11) AS INTEGER DIM k,m AS INTEGER Tur(1) = 1: Tur(2) = 11 Tur(3) = 8: Tur(4) = 12 Tur(5) = 5: Tur(6) = 6 Tur(7) = 15: Tur(8) = 16 Tur(9) = 16: Tur(10) = 21 Tur(11) = 7 m = 0 FOR k = 1 TO 11 IF Tur(k) < 10 THEN m = m + Tur(k) ENDIF NEXT k PRINT m | Tur = [1, 11, 8, 12, 5, 6, 15, 16, 16, 21, 7] m = 0 for k in range(11): if Tur[k] < 10: m = m + Tur[k] print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Tur: array[1..11] of integer; Begin Tur[1]:=1; Tur[2]:=11; Tur[3]:=8; Tur[4]:=12; Tur[5]:=5; Tur[6]:=6; Tur[7]:=15; Tur[8]:=16; Tur[9]:=16; Tur[10]:=21; Tur[11]:=7; m := 0; for k := 1 to 11 do if Tur[k] < 10 then begin m := m + Tur[k]; end; writeln(m); End.
| алг нач целтаб Tur[1:11] цел k, m Tur[1] := 1 Tur[2] := 11 Tur[3] := 8 Tur[4] := 12 Tur[5] := 5 Tur[6] := 6 Tur[7] := 15 Tur[8] := 16 Tur[9] := 16 Tur[10] := 21 Tur[11] := 7 m := 0 нц для k от 1 до 11 если Tur[k] < 10 то m := m + Tur[k] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Tur[11] = {1, 11, 8, 12, 5, 6, 15, 16, 16, 21, 7}; int m = 0; for (int k = 0; k < 11; k++) if (Tur[k] < 10) m = m + Tur[k]; cout << m; return 0; } | |
В таблице Tur хранятся данные о количестве ребят, ходивших в поход вместе с туристическим клубом «Полянка». (Tur[1] — число ребят в 2001 году, Tur[2] — в 2002 году и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования:
| Бейсик | Python |
|---|---|
DIM Tur(11) AS INTEGER DIM k,m AS INTEGER Tur(1) = 1: Tur(2) = 11 Tur(3) = 8: Tur(4) = 12 Tur(5) = 5: Tur(6) = 6 Tur(7) = 15: Tur(8) = 16 Tur(9) = 16: Tur(10) = 21 Tur(11) = 7 m = 0 FOR k = 1 TO 11 IF Tur(k) > 12 THEN m = m + Tur(k) ENDIF NEXT k PRINT m | Tur = [1, 11, 8, 12, 5, 6, 15, 16, 16, 21, 7] m = 0 for k in range(11): if Tur[k] > 12: m = m + Tur[k] print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Tur: array[1..11] of integer; Begin Tur[1]:=1; Tur[2]:=11; Tur[3]:=8; Tur[4]:=12; Tur[5]:=5; Tur[6]:=6; Tur[7]:=15; Tur[8]:=16; Tur[9]:=16; Tur[10]:=21; Tur[11]:=7; m := 0; for k := 1 to 11 do if Tur[k] > 12 then begin m := m + Tur[k]; end; writeln(m); End.
| алг нач целтаб Tur[1:11] цел k, m Tur[1] := 1 Tur[2] := 11 Tur[3] := 8 Tur[4] := 12 Tur[5] := 5 Tur[6] := 6 Tur[7] := 15 Tur[8] := 16 Tur[9] := 16 Tur[10] := 21 Tur[11] := 7 m := 0 нц для k от 1 до 11 если Tur[k] > 12 то m := m + Tur[k] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Tur[11] = {1, 11, 8, 12, 5, 6, 15, 16, 16, 21, 7}; int m = 0; for (int k = 0; k < 11; k++) if (Tur[k] > 12) m = m + Tur[k]; cout << m; return 0; } | |
В таблице Ani хранятся данные о численности обезьян в зоопарке города Тулы (Ani[1] — число обезьян в 2001 году, Ani[2] — в 2002 и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования:
| Бейсик | Python |
|---|---|
DIM Ani(12) AS INTEGER DIM k,m AS INTEGER Ani(1) = 17: Ani(2) = 17 Ani(3) = 19: Ani(4) = 21 Ani(5) = 23: Ani(6) = 22 Ani(7) = 24: Ani(8) = 16 Ani(9) = 19: Ani(10) = 21 Ani(11) = 17: Ani(12) = 17 m = 0 FOR k = 1 TO 12 IF Ani(k) = 17 THEN m = m + Ani(k) ENDIF NEXT k PRINT m | Ani = [17, 17, 19, 21, 23, 22, 24, 16, 19, 21, 17, 17] m = 0 for k in range(12): if Ani[k] == 17: m = m + Ani[k] print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Ani: array[1..12] of integer; Begin Ani[1] := 17; Ani[2] := 17; Ani[3] := 19; Ani[4] := 21; Ani[5] := 23; Ani[6] := 22; Ani[7] := 24; Ani[8] := 16; Ani[9] := 19; Ani[10] := 21; Ani[11] := 17; Ani[12] := 17; m := 0; for k := 1 to 12 do if Ani[k] = 17 then begin m := m + Ani[k]; end; writeln(m); End.
| алг нач целтаб Ani[1:12] цел k, m Ani[1] := 17 Ani[2] := 17 Ani[3] := 19 Ani[4] := 21 Ani[5] := 23 Ani[6] := 22 Ani[7] := 24 Ani[8] := 16 Ani[9] := 19 Ani[10] := 21 Ani[11] := 17 Ani[12] := 17 m := 0 нц для k от 1 до 12 если Ani[k] = 17 то m := m + Ani[k] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Ani[12] = {17, 17, 19, 21, 23, 22, 24, 16, 19, 21, 17, 17}; int m = 0; for (int k = 0; k < 12; k++) if (Ani[k] == 17) m = m + Ani[k]; cout << m; return 0; } | |
В таблице Sea хранятся данные о количестве россиян, отдыхавших на Чёрном море (Sea[1] — число россиян в 2001 году, Sea[2] — в 2002 и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования:
| Бейсик | Python |
|---|---|
DIM Sea(12) AS INTEGER DIM k,s AS INTEGER Sea(1) = 170: Sea(2) = 170 Sea(3) = 190: Sea(4) = 210 Sea(5) = 230: Sea(6) = 220 Sea(7) = 240: Sea(8) = 160 Sea(9) = 190: Sea(10) = 210 Sea(11) = 170: Sea(12) = 170 s = 100 FOR k = 1 TO 12 IF Sea(k) > 220 THEN s = s + Sea(k) ENDIF NEXT k PRINT s | Sea = [170, 170, 190, 210, 230, 220, 240, 160, 190, 210, 170, 170] s = 100 for k in range(12): if Sea[k] > 220: s = s + Sea[k] print (s)
|
| Паскаль | Алгоритмический язык |
Var k, s: integer; Sea: array[1..12] of integer; Begin Sea[1]:=170; Sea[2]:=170; Sea[3]:=190; Sea[4]:=210; Sea[5]:=230; Sea[6]:=220; Sea[7]:=240; Sea[8]:=160; Sea[9]:=190; Sea[10]:=210; Sea[11]:=170; Sea[12]:=170; s := 100; for k := 1 to 12 do if Sea[k] > 220 then begin s := s + Sea[k]; end; writeln(s); End.
| алг нач целтаб Sea[1:12] цел k, s Sea[1] := 170 Sea[2] := 170 Sea[3] := 190 Sea[4] := 210 Sea[5] := 230 Sea[6] := 220 Sea[7] := 240 Sea[8] := 160 Sea[9] := 190 Sea[10] := 210 Sea[11] := 170 Sea[12] := 170 s := 100 нц для k от 1 до 12 если Sea[k] > 220 то s := s + Sea[k] все кц вывод s кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Sea[12] = {170, 170, 190, 210, 230, 220, 240, 160, 190, 210, 170, 170}; int s = 100; for (int k = 0; k < 12; k++) if (Sea[k] > 220) s = s + Sea[k]; cout << s; return 0; } | |
В таблице Ves хранятся данные о весе в килограммах по группе учащихся спортивной школы (Ves[1] — вес первого учащегося, Ves[2] — вес второго учащегося и т. д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти алгоритмических языках:
| Бейсик | Python |
|---|---|
DIM Ves(14) AS INTEGER DIM i, n AS INTEGER Ves(1) = 25: Ves(2) = 21 Ves(3) = 23: Ves(4) = 28 Ves(5) = 30: Ves(6) = 25 Ves(7) = 31: Ves(8) = 28 Ves(9) = 25: Ves(10) = 28 Ves(11) = 30: Ves(12) = 27 Ves(13) = 26: Ves(14) = 24 n = Ves(1) FOR i = 1 TO 14 IF Ves(i) < n THEN n = Ves(i) ENDIF NEXT i PRINT n | Ves = [25, 21, 23, 28, 30, 25, 31, 28, 25, 28, 30, 27, 26, 24] n = Ves[0] for i in range(14): if Ves[i] < n: n = Ves[i] print (n)
|
| Паскаль | Алгоритмический язык |
Var i, n: integer; Ves: array[1..14] of integer; Begin Ves[1] := 25; Ves[2] := 21; Ves[3] := 23; Ves[4] := 28; Ves[5] := 30; Ves[6] := 25; Ves[7] := 31; Ves[8] := 28; Ves[9] := 25; Ves[10] := 28; Ves[11] := 30; Ves[12] := 27; Ves[13] := 26; Ves[14] := 24; n := Ves[1]; for i := 1 to 14 do if Ves[i] < n then begin n := Ves[i]; end; writeln(n); End.
| алг нач целтаб Ves[1:14] цел i, n Ves[1] := 25 Ves[2] := 21 Ves[3] := 23 Ves[4] := 28 Ves[5] := 30 Ves[6] := 25 Ves[7] := 31 Ves[8] := 28 Ves[9] := 25 Ves[10] := 28 Ves[11] := 30 Ves[12] := 27 Ves[13] := 26 Ves[14] := 24 n := Ves[1] нц для i от 1 до 14 если Ves[i] < n то n := Ves[i] все кц вывод n кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Ves[14] = {25, 21, 23, 28, 30, 25, 31, 28, 25, 28, 30, 27, 26, 24}; int n = Ves[0]; for (int i = 0; i < 14; i++) if (Ves[i] < n) n = Ves[i]; cout << n; return 0; } | |
В таблице Ves хранятся данные о весе в килограммах по группе учащихся спортивной школы (Ves[1] — вес первого учащегося, Ves[2] — вес второго учащегося и т. д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти алгоритмических языках:
| Бейсик | Python |
|---|---|
DIM Ves(14) AS INTEGER DIM i, n AS INTEGER Ves(1) = 25: Ves(2) = 21 Ves(3) = 23: Ves(4) = 28 Ves(5) = 30: Ves(6) = 25 Ves(7) = 31: Ves(8) = 28 Ves(9) = 25: Ves(10) = 28 Ves(11) = 30: Ves(12) = 27 Ves(13) = 26: Ves(14) = 24 n = 0 FOR i = 1 TO 14 IF Ves(i) > 26 THEN n = n + 1 ENDIF NEXT i PRINT n | Ves = [25, 21, 23, 28, 30, 25, 31, 28, 25, 28, 30, 27, 26, 24] n = 0 for i in range(14): if Ves[i] > 26: n = n + 1 print (n)
|
| Паскаль | Алгоритмический язык |
Var i, n: integer; Ves: array[1..14] of integer; Begin Ves[1] := 25; Ves[2] := 21; Ves[3] := 23; Ves[4] := 28; Ves[5] := 30; Ves[6] := 25; Ves[7] := 31; Ves[8] := 28; Ves[9] := 25; Ves[10] := 28; Ves[11] := 30; Ves[12] := 27; Ves[13] := 26; Ves[14] := 24; n := 0; for i := 1 to 14 do if Ves[i] > 26 then begin n := n + 1; end; writeln(n); End.
| алг нач целтаб Ves[1:14] цел i, n Ves[1] := 25 Ves[2] := 21 Ves[3] := 23 Ves[4] := 28 Ves[5] := 30 Ves[6] := 25 Ves[7] := 31 Ves[8] := 28 Ves[9] := 25 Ves[10] := 28 Ves[11] := 30 Ves[12] := 27 Ves[13] := 26 Ves[14] := 24 n := 0 нц для i от 1 до 14 если Ves[i] > 26 то n := n + 1 все кц вывод n кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Ves[14] = {25, 21, 23, 28, 30, 25, 31, 28, 25, 28, 30, 27, 26, 24}; int n = 0; for (int i = 0; i < 14; i++) if (Ves[i] > 26) n = n + 1; cout << n; return 0; } | |
В таблице Dat хранятся данные о количестве учеников в классах (Dat[1] — количество учеников в первом классе, Dat[2] — во втором и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 16: Dat(2) = 20 Dat(3) = 20: Dat(4) = 41 Dat(5) = 14: Dat(6) = 21 Dat(7) = 28: Dat(8) = 12 Dat(9) = 15: Dat(10) = 35 m = 0 FOR k = 1 TO 10 IF Dat(k) > m THEN m = Dat(k) ENDIF NEXT k PRINT m | Dat = [16, 20, 20, 41, 14, 21, 28, 12, 15, 35] m = 0 for k in range (10): if Dat[k] > m: m = Dat[k] print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 16; Dat[2] := 20; Dat[3] := 20; Dat[4] := 41; Dat[5] := 14; Dat[6] := 21; Dat[7] := 28; Dat[8] := 12; Dat[9]:=15; Dat[10]:=35; m := 0; for k := 1 to 10 do if Dat[k] > m then begin m := Dat[k]; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m Dat[1] := 16 Dat[2] := 20 Dat[3] := 20 Dat[4] := 41 Dat[5] := 14 Dat[6] := 21 Dat[7] := 28 Dat[8] := 12 Dat[9] := 15 Dat[10] := 35 m := 0 нц для k от 1 до 10 если Dat[k] > m то m := Dat[k] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {16, 20, 20, 41, 14, 21, 28, 12, 15, 35}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] > m) m = Dat[k]; cout << m; return 0; } | |
Школьник делал лабораторную работу по физике, в ходе которой измерил 10 раз силу тока и записал показания амперметра в таблицу Tok (Tok[1] — результат первого измерения, Tok[2] — второго и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Tok(10) AS INTEGER DIM k,m AS INTEGER Tok(1) = 10: Tok(2) = 14 Tok(3) = 15: Tok(4) = 4 Tok(5) = 12: Tok(6) = 6 Tok(7) = 3: Tok(8) = 5 Tok(9) = 5: Tok(10) = 10 m = 22 FOR k = 1 TO 10 IF Tok(k) > 10 THEN m = m − 1 ENDIF NEXT k PRINT m | Tok = [10, 14, 15, 4, 12, 6, 3, 5, 5, 10] m = 22 for k in range (10): if Tok[k] > 10: m = m − 1 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Tok: array[1..10] of integer; Begin Tok[1] := 10; Tok[2] := 14; Tok[3] := 15; Tok[4] := 4; Tok[5] := 12; Tok[6] := 6; Tok[7] := 3; Tok[8] := 5; Tok[9] := 5; Tok[10] := 10; m := 22; for k := 1 to 10 do if Tok[k] > 10 then begin m := m − 1; end; writeln(m); End.
| алг нач целтаб Tok[1:10] цел k, m Tok[1] := 10 Tok[2] := 14 Tok[3] := 15 Tok[4] := 4 Tok[5] := 12 Tok[6] := 6 Tok[7] := 3 Tok[8] := 5 Tok[9] := 5 Tok[10] := 10 m := 22 нц для k от 1 до 10 если Tok[k] > 10 то m := m − 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Tok[10] = {10, 14, 15, 4, 12, 6, 3, 5, 5, 10}; int m = 22; for (int k = 0; k < 10; k++) if (Tok[k] > 10) m = m − 1; cout << m; return 0; } | |
Школьник делал лабораторную работу по физике, в ходе которой измерил 10 раз силу тока и записал показания амперметра в таблицу Tok (Tok[1] — результат первого измерения, Tok[2] — второго и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Tok(10) AS INTEGER DIM k,m AS INTEGER Tok(1) = 10: Tok(2) = 14 Tok(3) = 15: Tok(4) = 4 Tok(5) = 12: Tok(6) = 6 Tok(7) = 3: Tok(8) = 5 Tok(9) = 5: Tok(10) = 10 m = 0 FOR k = 1 TO 10 IF Tok(k) > 6 THEN m = m + 2 ENDIF NEXT k PRINT m | Tok = [10, 14, 15, 4, 12, 6, 3, 5, 5, 10] m = 0 for k in range (10): if Tok[k] > 6: m = m + 2 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Tok: array[1..10] of integer; Begin Tok[1] := 10; Tok[2] := 14; Tok[3] := 15; Tok[4] := 4; Tok[5] := 12; Tok[6] := 6; Tok[7] := 3; Tok[8] := 5; Tok[9] := 5; Tok[10] := 10; m := 0; for k := 1 to 10 do if Tok[k] > 6 then begin m := m + 2; end; writeln(m); End.
| алг нач целтаб Tok[1:10] цел k, m Tok[1] := 10 Tok[2] := 14 Tok[3] := 15 Tok[4] := 4 Tok[5] := 12 Tok[6] := 6 Tok[7] := 3 Tok[8] := 5 Tok[9] := 5 Tok[10] := 10 m := 0 нц для k от 1 до 10 если Tok[k] > 6 то m := m + 2 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Tok[10] = {10, 14, 15, 4, 12, 6, 3, 5, 5, 10}; int m = 0; for (int k = 0; k < 10; k++) if (Tok[k] > 6) m = m + 2; cout << m; return 0; } | |
Владелец крупного яблоневого сада в течение 12 лет записывал в таблицу App количество собранного урожая. (App[1] — количество тонн яблок, собранных за первый год, App[2] — за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM App(12) AS INTEGER DIM k,m AS INTEGER App(1) = 100: App(2) = 128 App(3) = 80: App(4) = 99 App(5) = 120: App(6) = 69 App(7) = 55: App(8) = 115 App(9) = 84: App(10) = 111 App(11) = 59: App(12) = 100 m = 0 FOR k = 1 TO 12 IF App(k) > 100 THEN m = m + 1 ENDIF NEXT k m = m + 10 PRINT m | App = [100, 128, 80, 99, 120, 69, 55, 115, 84, 111, 59, 100] m = 0 for k in range(12): if App[k] > 100: m = m + 1 m = m + 10 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; App: array[1..12] of integer; Begin App[1]:=100; App[2]:=128; App[3]:=80; App[4]:=99; App[5]:=120; App[6]:=69; App[7]:=55; App[8]:=115; App[9]:=84; App[10]:=111; App[11]:=59;App[12]:=100; m := 0; for k := 1 to 12 do if App[k] > 100 then begin m := m + 1; end; m := m + 10; writeln(m); End.
| алг нач целтаб App[1:12] цел k, m App[1] := 100 App[2] := 128 App[3] := 80 App[4] := 99 App[5] := 120 App[6] := 69 App[7] := 55 App[8] := 115 App[9] := 84 App[10] := 111 App[11] := 59 App[12] := 100 m := 0 нц для k от 1 до 12 если App[k] > 100 то m := m + 1 все кц m := m + 10 вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int App[12] = {100, 128, 80, 99, 120, 69, 55, 115, 84, 111, 59, 100}; int m = 0; for (int k = 0; k < 12; k++) if (App[k] > 100) m = m + 1; m = m + 10; cout << m; return 0; } | |
Владелец крупного яблоневого сада в течение 12 лет записывал в таблицу App количество собранного урожая. (App[1] — количество тонн яблок, собранных за первый год, App[2] — за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM App(12) AS INTEGER DIM k,m AS INTEGER App(1) = 100: App(2) = 128 App(3) = 80: App(4) = 99 App(5) = 120: App(6) = 69 App(7) = 55: App(8) = 115 App(9) = 84: App(10) = 111 App(11) = 59: App(12) = 100 m = 0 FOR k = 1 TO 12 IF App(k) < 80 THEN m = m + 1 ENDIF NEXT k m = m + 20 PRINT m | App = [100, 128, 80, 99, 120, 69, 55, 115, 84, 111, 59, 100] m = 0 for k in range(12): if App[k] < 80: m = m + 1 m = m + 20 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; App: array[1..12] of integer; Begin App[1]:=100; App[2]:=128; App[3]:=80; App[4]:=99; App[5]:=120; App[6]:=69; App[7]:=55; App[8]:=115; App[9]:=84; App[10]:=111; App[11]:=59;App[12]:=100; m := 0; for k := 1 to 12 do if App[k] < 80 then begin m := m + 1; end; m := m + 20; writeln(m); End.
| алг нач целтаб App[1:12] цел k, m App[1] := 100 App[2] := 128 App[3] := 80 App[4] := 99 App[5] := 120 App[6] := 69 App[7] := 55 App[8] := 115 App[9] := 84 App[10] := 111 App[11] := 59 App[12] := 100 m := 0 нц для k от 1 до 12 если App[k] < 80 то m := m + 1 все кц m := m + 20 вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int App[12] = {100, 128, 80, 99, 120, 69, 55, 115, 84, 111, 59, 100}; int m = 0; for (int k = 0; k < 12; k++) if (App[k] < 80) m = m + 1; m = m + 20; cout << m; return 0; } | |
В таблице Dat хранятся отметки учащихся 9 класса за самостоятельную работу (Dat[1] — отметка первого учащегося, Dat[2] — второго и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 4: Dat(2) = 5 Dat(3) = 4: Dat(4) = 3 Dat(5) = 2: Dat(6) = 3 Dat(7) = 4: Dat(8) = 5 Dat(9) = 5: Dat(10) = 3 m = 0 FOR k = 1 TO 10 IF Dat(k) > 3 THEN m = m + 1 ENDIF NEXT k PRINT m | Dat = [4, 5, 4, 3, 2, 3, 4, 5, 5, 3] m = 0 for k in range (10): if Dat[k] > 3: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 4; Dat[2] := 5; Dat[3] := 4; Dat[4] := 3; Dat[5] := 2; Dat[6] := 3; Dat[7] := 4; Dat[8] := 5; Dat[9]:=5; Dat[10]:=3; m := 0; for k := 1 to 10 do if Dat[k] > 3 then begin m := m + 1; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m Dat[1] := 4 Dat[2] := 5 Dat[3] := 4 Dat[4] := 3 Dat[5] := 2 Dat[6] := 3 Dat[7] := 4 Dat[8] := 5 Dat[9] := 5 Dat[10] := 3 m := 0 нц для k от 1 до 10 если Dat[k] > 3 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {4, 5, 4, 3, 2, 3, 4, 5, 5, 3}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] > 3) m = m + 1; cout << m; return 0; } | |
В таблице Dat хранятся отметки учащихся 9 класса за самостоятельную работу (Dat[1] – отметка первого учащегося, Dat[2] – второго и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 4: Dat(2) = 5 Dat(3) = 4: Dat(4) = 3 Dat(5) = 2: Dat(6) = 3 Dat(7) = 4: Dat(8) = 5 Dat(9) = 5: Dat(10) = 3 m = 0 FOR k = 1 TO 10 IF Dat(k) < 4 THEN m = m + Dat(k) ENDIF NEXT k PRINT m | Dat = [4, 5, 4, 3, 2, 3, 4, 5, 5, 3] m = 0 for k in range (10): if Dat[k] < 4: m = m + Dat[k] print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 4; Dat[2] := 5; Dat[3] := 4; Dat[4] := 3; Dat[5] := 2; Dat[6] := 3; Dat[7] := 4; Dat[8] := 5; Dat[9]:=5; Dat[10]:=3; m := 0; for k := 1 to 10 do if Dat[k] < 4 then begin m := m + Dat[k]; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m Dat[1] := 4 Dat[2] := 5 Dat[3] := 4 Dat[4] := 3 Dat[5] := 2 Dat[6] := 3 Dat[7] := 4 Dat[8] := 5 Dat[9] := 5 Dat[10] := 3 m := 0 нц для k от 1 до 10 если Dat[k] < 4 то m := m + Dat[k] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {4, 5, 4, 3, 2, 3, 4, 5, 5, 3}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] < 4) m = m + Dat[k]; cout << m; return 0; } | |
Сотрудник метеобюро в ходе измерений среднесуточной температуры записывал показания термометра в таблицу Tem (Tem[1] — температура, полученная в результате первого измерения, Tem[2] — второго и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Tem(12) AS INTEGER DIM k, b AS INTEGER Tem(1) = 22: Tem(2) = 25 Tem(3) = 20: Tem(4) = 18 Tem(5) = 16: Tem(6) = 14 Tem(7) = 20: Tem(8) = 23 Tem(9) = 17: Tem(10) = 19 Tem(11) = 20: Tem(12) = 21 b = 15 FOR k = 1 TO 12 IF Tem(k) < 20 THEN b = b + 1 ENDIF NEXT k PRINT b | Tem = [22, 25, 20, 18, 16, 14, 20, 23, 17, 19, 20, 21] b = 15 for k in range (12): if Tem[k] < 20: b = b + 1 print (b)
|
| Паскаль | Алгоритмический язык |
Var k, b: integer; Tem: array[1..12] of integer; Begin Tem[1]:=22;Tem[2]:=25; Tem[3]:=20;Tem[4]:=18; Tem[5]:=16;Tem[6]:=14; Tem[7]:=20;Tem[8]:=23; Tem[9]:=17;Tem[10]:=19; Tem[11]:=20;Tem[12]:=21; b := 15; for k := 1 to 12 do if Tem[k] < 20 then begin b := b + 1; end; writeln(b); End.
| алг нач целтаб Tem[1:12] цел k, b Tem[1] := 22 Tem[2] := 25 Tem[3] := 20 Tem[4] := 18 Tem[5] := 16 Tem[6] := 14 Tem[7] := 20 Tem[8] := 23 Tem[9] := 17 Tem[10] := 19 Tem[11] := 20 Tem[12] := 21 b := 15 нц для k от 1 до 12 если Tem[k] < 20 то b := b + 1 все кц вывод b кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Tem[12] = {22, 25, 20, 18, 16, 14, 20, 23, 17, 19, 20, 21}; int b = 15; for (int k = 0; k < 12; k++) if (Tem[k] < 20) b = b + 1; cout << b; return 0; } | |
Сотрудник метеобюро в ходе измерений среднесуточной температуры записывал показания термометра в таблицу Tem (Tem[1] — температура, полученная в результате первого измерения, Tem[2] — второго и т. д.).
Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Tem(12) AS INTEGER DIM k, b AS INTEGER Tem(1) = 22: Tem(2) = 25 Tem(3) = 20: Tem(4) = 18 Tem(5) = 16: Tem(6) = 14 Tem(7) = 20: Tem(8) = 23 Tem(9) = 17: Tem(10) = 19 Tem(11) = 20: Tem(12) = 21 b = 0 FOR k = 1 TO 12 IF Tem(k) < 19 THEN b = b + Tem(k) ENDIF NEXT k PRINT b | Tem = [22, 25, 20, 18, 16, 14, 20, 23, 17, 19, 20, 21] b = 0 for k in range (12): if Tem[k] < 19: b = b + Tem[k] print (b)
|
| Паскаль | Алгоритмический язык |
Var k, b: integer; Tem: array[1..12] of integer; Begin Tem[1]:=22;Tem[2]:=25; Tem[3]:=20;Tem[4]:=18; Tem[5]:=16;Tem[6]:=14; Tem[7]:=20;Tem[8]:=23; Tem[9]:=17;Tem[10]:=19; Tem[11]:=20;Tem[12]:=21; b := 0; for k := 1 to 12 do if Tem[k] < 19 then begin b := b + Tem[k]; end; writeln(b); End.
| алг нач целтаб Tem[1:12] цел k, b Tem[1] := 22 Tem[2] := 25 Tem[3] := 20 Tem[4] := 18 Tem[5] := 16 Tem[6] := 14 Tem[7] := 20 Tem[8] := 23 Tem[9] := 17 Tem[10] := 19 Tem[11] := 20 Tem[12] := 21 b := 0 нц для k от 1 до 12 если Tem[k] < 19 то b := b + Tem[k] все кц вывод b кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Tem[12] = {22, 25, 20, 18, 16, 14, 20, 23, 17, 19, 20, 21}; int b = 0; for (int k = 0; k < 12; k++) if (Tem[k] < 19) b = b + Tem[k]; cout << b; return 0; } | |
Садовник, работая в оранжерее ботанического сада, записывал в таблицу Flow количество видов растений, цветущих в текущем месяце. (Flow[1] — количество цветущих растений в январе, Flow[2] — в феврале и т. д.).
Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Flow(12) AS INTEGER DIM k, m AS INTEGER Flow(1) = 25: Flow(2) = 33 Flow(3) = 45: Flow(4) = 56 Flow(5) = 78: Flow(6) = 112 Flow(7) = 120: Flow(8) = 133 Flow(9) = 97: Flow(10) = 77 Flow(11) = 59: Flow(12) = 34 m = 23 FOR k = 1 TO 12 IF Flow(k) < 50 THEN m = m + 1 ENDIF NEXT k PRINT m | Flow = [25, 33, 45, 56, 78, 112, 120, 133, 97, 77, 59, 34] m = 23 for k in range (12): if Flow[k] < 50: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Flow: array[1..12] of integer; Begin Flow[1]:=25;Flow[2]:=33; Flow[3]:=45;Flow[4]:=56; Flow[5]:=78;Flow[6]:=112; Flow[7]:=120;Flow[8]:=133; Flow[9]:=97;Flow[10]:=77; Flow[11]:=59;Flow[12]:=34; m := 23; for k := 1 to 12 do if Flow[k] < 50 then begin m := m + 1; end; writeln(m); End.
| алг нач целтаб Flow[1:12] цел k, m Flow[1] := 25 Flow[2] := 33 Flow[3] := 45 Flow[4] := 56 Flow[5] := 78 Flow[6] := 112 Flow[7] := 120 Flow[8] := 133 Flow[9] := 97 Flow[10] := 77 Flow[11] := 59 Flow[12] := 34 m := 23 нц для k от 1 до 12 если Flow[k] < 50 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Flow[12] = {25, 33, 45, 56, 78, 112, 120, 133, 97, 77, 59, 34}; int m = 23; for (int k = 0; k < 12; k++) if (Flow[k] < 50) m = m + 1; cout << m; return 0; } | |
Садовник, работая в оранжерее ботанического сада, записывал в таблицу Flow количество видов растений, цветущих в текущем месяце. (Flow[1] — количество цветущих растений в январе, Flow[2] – в феврале и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Flow(12) AS INTEGER DIM k, m AS INTEGER Flow(1) = 25: Flow(2) = 33 Flow(3) = 45: Flow(4) = 56 Flow(5) = 78: Flow(6) = 112 Flow(7) = 120: Flow(8) = 133 Flow(9) = 97: Flow(10) = 77 Flow(11) = 59: Flow(12) = 34 m = 35 FOR k = 1 TO 12 IF Flow(k) > 100 THEN m = m + 1 ENDIF NEXT k PRINT m | Flow = [25, 33, 45, 56, 78, 112, 120, 133, 97, 77, 59, 34] m = 35 for k in range (12): if Flow[k] > 100: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Flow: array[1..12] of integer; Begin Flow[1]:=25;Flow[2]:=33; Flow[3]:=45;Flow[4]:=56; Flow[5]:=78;Flow[6]:=112; Flow[7]:=120;Flow[8]:=133; Flow[9]:=97;Flow[10]:=77; Flow[11]:=59;Flow[12]:=34; m := 35; for k := 1 to 12 do if Flow[k] > 100 then begin m := m + 1; end; writeln(m); End.
| алг нач целтаб Flow[1:12] цел k, m Flow[1] := 25 Flow[2] := 33 Flow[3] := 45 Flow[4] := 56 Flow[5] := 78 Flow[6] := 112 Flow[7] := 120 Flow[8] := 133 Flow[9] := 97 Flow[10] := 77 Flow[11] := 59 Flow[12] := 34 m := 35 нц для k от 1 до 12 если Flow[k] > 100 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Flow[12] = {25, 33, 45, 56, 78, 112, 120, 133, 97, 77, 59, 34}; int m = 35; for (int k = 0; k < 12; k++) if (Flow[k] > 100) m = m + 1; cout << m; return 0; } | |
Известная авиакомпания заносила данные о количестве утерянного багажа за год в таблицу Lose. Всего были занесены данные за последние 10 лет работы компании (Lose[1] — количество утерянного багажа за первый год работы, Lose[2] — за второй год и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Lose(10) AS INTEGER DIM t,m AS INTEGER Lose(1) = 1: Lose(2) = 5 Lose(3) = 3: Lose(4) = 6 Lose(5) = 7: Lose(6) = 12 Lose(7) = 1: Lose(8) = 3 Lose(9) = 3: Lose(10) = 1 m = 0 FOR t = 1 TO 10 IF Lose(t) > 3 THEN m = m + Lose(t) ENDIF NEXT t PRINT m | Lose = [1, 5, 3, 6, 7, 12, 1, 3, 3, 1] m = 0 for t in range (10): if Lose[t] > 3: m = m + Lose[t] print (m)
|
| Паскаль | Алгоритмический язык |
Var t, m: integer; Lose: array[1..10] of integer; Begin Lose[1]:=1;Lose[2]:=5; Lose[3]:=3;Lose[4]:=6; Lose[5]:=7;Lose[6]:=12; Lose[7]:=1;Lose[8]:=3; Lose[9]:=3;Lose[10]:=1; m := 0; for t := 1 to 10 do if Lose[t] > 3 then begin m := m + Lose[t]; end; writeln(m); End.
| алг нач целтаб Lose[1:10] цел t, m Lose[1] := 1 Lose[2] := 5 Lose[3] := 3 Lose[4] := 6 Lose[5] := 7 Lose[6] := 12 Lose[7] := 1 Lose[8] := 3 Lose[9] := 3 Lose[10] := 1 m := 0 нц для t от 1 до 10 если Lose[t] > 3 то m := m + Lose[t] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Lose[10] = {1, 5, 3, 6, 7, 12, 1, 3, 3, 1}; int m = 0; for (int t = 0; t < 10; t++) if (Lose[t] > 3) m = m + Lose[t]; cout << m; return 0; } | |
Известная авиакомпания заносила данные о количестве утерянного багажа за год в таблицу Lose. Всего были занесены данные за последние 10 лет работы компании (Lose[1] — количество утерянного багажа за первый год работы, Lose[2] — за второй год и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Lose(10) AS INTEGER DIM t,m AS INTEGER Lose(1) = 1: Lose(2) = 5 Lose(3) = 3: Lose(4) = 6 Lose(5) = 7: Lose(6) = 12 Lose(7) = 1: Lose(8) = 3 Lose(9) = 3: Lose(10) = 1 m = 0 FOR t = 1 TO 10 IF Lose(t) < 6 THEN m = m + Lose(t) ENDIF NEXT t PRINT m | Lose = [1, 5, 3, 6, 7, 12, 1, 3, 3, 1] m = 0 for t in range (10): if Lose[t] < 6: m = m + Lose[t] print (m)
|
| Паскаль | Алгоритмический язык |
Var t, m: integer; Lose: array[1..10] of integer; Begin Lose[1]:=1;Lose[2]:=5; Lose[3]:=3;Lose[4]:=6; Lose[5]:=7;Lose[6]:=12; Lose[7]:=1;Lose[8]:=3; Lose[9]:=3;Lose[10]:=1; m := 0; for t := 1 to 10 do if Lose[t] < 6 then begin m := m + Lose[t]; end; writeln(m); End.
| алг нач целтаб Lose[1:10] цел t, m Lose[1] := 1 Lose[2] := 5 Lose[3] := 3 Lose[4] := 6 Lose[5] := 7 Lose[6] := 12 Lose[7] := 1 Lose[8] := 3 Lose[9] := 3 Lose[10] := 1 m := 0 нц для t от 1 до 10 если Lose[t] < 6 то m := m + Lose[t] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Lose[10] = {1, 5, 3, 6, 7, 12, 1, 3, 3, 1}; int m = 0; for (int t = 0; t < 10; t++) if (Lose[t] < 6) m = m + Lose[t]; cout << m; return 0; } | |
В таблице A хранятся данные о количестве призёров олимпиады по программированию по девяти округам Москвы. Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM A(9) AS INTEGER DIM k, score AS INTEGER A(1) = 6: A(2) = 11 A(3) = 7: A(4) = 12 A(5) = 13: A(6) = 5 A(7) = 9: A(8) = 3 A(9) = 4 score = 0 FOR k = 1 TO 9 IF A(k) >= 9 THEN score = score + A(k) ENDIF NEXT k PRINT score | A = [6, 11, 7, 12, 13, 5, 9, 3, 4] score = 0 for k in range (9): if A[k] >= 9: score = score + A[k] print (score)
|
| Паскаль | Алгоритмический язык |
Var k, score: integer; A: array[1..9] of integer; Begin A[1]:=6;A[2]:=11; A[3]:=7;A[4]:=12; A[5]:=13;A[6]:=5; A[7]:=9;A[8]:=3; A[9]:=4; score := 0; for k := 1 to 9 do if A[k] >= 9 then begin score := score + A[k]; end; writeln(score); End.
| алг нач целтаб A[1:9] цел k, score A[1] := 6 A[2] := 11 A[3] := 7 A[4] := 12 A[5] := 13 A[6] := 5 A[7] := 9 A[8] := 3 A[9] := 4 score := 0 нц для k от 1 до 9 если A[k] >= 9 то score := score + A[k] все кц вывод score кон |
| С++ | |
#include <iostream> using namespace std; int main() { int A[9] = {6, 11, 7, 12, 13, 5, 9, 3, 4}; int score = 0; for (int k = 0; k < 9; k++) if (A[k] >= 9) score = score + A[k]; cout << score; return 0; } | |
В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] — второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k, m, n AS INTEGER Dat(1) = 7: Dat(2) = 9 Dat(3) = 10: Dat(4) = 5 Dat(5) = 6: Dat(6) = 7 Dat(7) = 9: Dat(8) = 10 Dat(9) = 6: Dat(10) = 9 m = 0; n = 0 FOR k = 1 TO 10 IF Dat(k) >= m THEN m = Dat(k) n = k ENDIF NEXT k PRINT n | Dat = [7, 9, 10, 5, 6, 7, 9, 10, 6, 9] m = 0 n = 0 for k in range(10): if Dat[k] >= m: m = Dat[k] n = k + 1 print (n)
|
| Паскаль | Алгоритмический язык |
Var k, m, n: integer; Dat: array[1..10] of integer; Begin Dat[1] := 7; Dat[2] := 9; Dat[3] := 10; Dat[4] := 5; Dat[5] := 6; Dat[6] := 7; Dat[7] := 9; Dat[8] := 10; Dat[9] := 6; Dat[10] := 9; m := 0; n := 0; for k := 1 to 10 do if Dat[k] >= m then begin m := Dat[k]; n := k; end; writeln(n); End.
| алг нач целтаб Dat[1:10] цел k, m, n Dat[1] := 7 Dat[2] := 9 Dat[3] := 10 Dat[4] := 5 Dat[5] := 6 Dat[6] := 7 Dat[7] := 9 Dat[8] := 10 Dat[9] := 6 Dat[10] := 9 m := 0 n := 0 нц для k от 1 до 10 если Dat[k] >= m то m := Dat[k] n := k все кц вывод n кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {7, 9, 10, 5, 6, 7, 9, 10, 6, 9}; int m = 0; int n = 0; for (int k = 0; k < 10; k++) if (Dat[k] >= m) { m = Dat[k]; n = k + 1; } cout << n; return 0; } | |
В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] — второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 7: Dat(2) = 9 Dat(3) = 10: Dat(4) = 5 Dat(5) = 6: Dat(6) = 7 Dat(7) = 9: Dat(8) = 8 Dat(9) = 6: Dat(10) = 7 m = 0 FOR k = 1 TO 10 IF Dat(k) < 8 THEN m = m + 1 ENDIF NEXT k PRINT m | Dat = [7, 9, 10, 5, 6, 7, 9, 8, 6, 7] m = 0 for k in range(10): if Dat[k] < 8: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 7; Dat[2] := 9; Dat[3] := 10; Dat[4] := 5; Dat[5] := 6; Dat[6] := 7; Dat[7] := 9; Dat[8] := 8; Dat[9] := 6; Dat[10] := 7; m := 0; for k := 1 to 10 do if Dat[k] < 8 then begin m := m + 1; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m Dat[1] := 7 Dat[2] := 9 Dat[3] := 10 Dat[4] := 5 Dat[5] := 6 Dat[6] := 7 Dat[7] := 9 Dat[8] := 8 Dat[9] := 6 Dat[10] := 7 m := 0 нц для k от 1 до 10 если Dat[k] < 8 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {7, 9, 10, 5, 6, 7, 9, 8, 6, 7}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] < 8) m = m + 1; cout << m; return 0; } | |
В таблице Dat хранятся данные ежедневных измерений количества осадков за неделю в миллиметрах (Dat[1] — данные за понедельник, Dat[2] — за вторник и т.д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(7) AS INTEGER DIM k, day AS INTEGER Dat(1) = 14: Dat(2) = 9 Dat(3) = 0: Dat(4) = 15 Dat(5) = 0: Dat(6) = 15 Dat(7) = 10 day = 0 FOR k = 1 TO 7 IF Dat(k) = 0 THEN day = k ENDIF NEXT k PRINT day | Dat = [14, 10, 0, 15, 0, 15, 10] day = 0 for k in range(7): if Dat[k] == 0: day = k + 1 print (day)
|
| Паскаль | Алгоритмический язык |
Var k, day: integer; Dat: array[1..7] of integer; Begin Dat[1] := 14; Dat[2] := 10; Dat[3] := 0; Dat[4] := 15; Dat[5] := 0; Dat[6] := 15; Dat[7] := 10; day := 0; for k := 1 to 7 do if Dat[k] = 0 then begin day := k; end; writeln(day); End.
| алг нач целтаб Dat[1:7] цел k, day Dat[1] := 14 Dat[2] := 10 Dat[3] := 0 Dat[4] := 15 Dat[5] := 0 Dat[6] := 15 Dat[7] := 10 day := 0 нц для k от 1 до 7 если Dat[k] = 0 то day := k все кц вывод day кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[7] = {14, 10, 0, 15, 0, 15, 10}; int day = 0; for (int k = 0; k < 7; k++) if (Dat[k] == 0) day = k + 1; cout << day; return 0; } | |
В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] — данные за первый день, Dat[2] — за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER 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 = 20 FOR k = 1 TO 10 IF Dat(k) < m THEN m = Dat(k) ENDIF NEXT k PRINT m | Dat = [12, 15, 17, 15, 14, 12, 10, 13, 14, 15] m = 20 for k in range (10): if Dat[k] < m: m = Dat[k] print (m)
|
| Паскаль | Алгоритмический язык |
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 := 20; for k := 1 to 10 do if Dat[k] < m then begin m := Dat[k]; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m 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 := 20 нц для k от 1 до 10 если Dat[k] < m то m := Dat[k] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {12, 15, 17, 15, 14, 12, 10, 13, 14, 15}; int m = 20; for (int k = 0; k < 10; k++) if (Dat[k] < m) m = Dat[k]; cout << m; return 0; } | |
В таблице Dat хранятся данные о количестве учеников в классах (Dat[1] — количество учеников в первом классе, Dat[2] — во втором и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(11) AS INTEGER DIM k, m AS INTEGER 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 IF Dat(k) < 25 THEN m = m + 1 ENDIF NEXT k PRINT m | Dat = [20, 25, 19, 25, 26, 22, 24, 28, 26, 21, 27] m = 0 for k in range(11): if Dat[k] < 25: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
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 Dat[k] < 25 then begin m := m + 1; end; writeln(m); End.
| алг нач целтаб 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 := 0 нц для k от 1 до 11 если Dat[k] < 25 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[11] = {20, 25, 19, 25, 26, 22, 24, 28, 26, 21, 27}; int m = 0; for (int k = 0; k < 11; k++) if (Dat[k] < 25) { m = m + 1; } cout << m; return 0; } | |
В таблице Pos хранятся данные о количестве посетителей школьного музея за семь дней (Pos[1] − данные за первый день, Pos[2] — за второй день и т.д.). Определите число, которое будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.
| Бейсик | Python |
|---|---|
DIM Pos(7) AS INTEGER DIM k, m, day AS INTEGER Pos(1) = 17: Pos(2) = 19 Pos(3) = 20: Pos(4) = 18 Pos(5) = 16: Pos(6) = 20 Pos(7) = 16 day = 1 m = Pos(1) FOR k = 2 TO 7 IF Pos(k) < m THEN m = Pos(k) day = k ENDIF NEXT k PRINT day | Pos = [17, 19, 20, 18, 16, 20, 16] day = 1 m = Pos[0] for k in range(1, 7): if Pos[k] < m: m = Pos[k] day = k + 1 print (day)
|
| Паскаль | Алгоритмический язык |
Var k, m, day: integer; Pos: array[1..7] of integer; Begin Pos[1] := 17; Pos[2] := 19; Pos[3] := 20; Pos[4] := 18; Pos[5] := 16; Pos[6] := 20; Pos[7] := 16; day := 1; m := Pos[1]; for k := 2 to 7 do if Pos[k] < m then begin m := Pos[k]; day := k; end; writeln(day); End.
| алг нач целтаб Pos[1:7] цел k, m, day Pos[1] := 17 Pos[2] := 19 Pos[3] := 20 Pos[4] := 18 Pos[5] := 16 Pos[6] := 20 Pos[7] := 16 day := 1 m := Pos[1] нц для k от 2 до 7 если Pos[k] < m то m := Pos[k] day := k все кц вывод day кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Pos[7] = {17, 19, 20, 18, 16, 20, 16}; int day = 1; int m = Pos[0]; for (int k = 1; k < 7; k++) if (Pos[k] < m) { day = k + 1; m = Pos[k]; } cout << day; return 0; } | |
В таблице Ball хранятся баллы, набранные участниками школьного тура олимпиады по математике (Ball[1] — балл 1 ученика, Ball[2] — балл 2 ученика и т.д.). Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Ball(10) AS INTEGER DIM k,m AS INTEGER Ball(1) = 42: Ball(2) = 25 Ball(3) = 13: Ball(4) = 18 Ball(5) = 15: Ball(6) = 55 Ball(7) = 48: Ball(8) = 13 Ball(9) = 64: Ball(10) = 45 m = Ball(1) FOR k = 1 TO 10 IF Ball(k) < m THEN m = Ball(k) ENDIF NEXT k PRINT m | Ball = [42, 25, 13, 18, 15, 55, 48, 13, 64, 45] m = Ball[0] for k in range (10): if Ball[k] < m: m = Ball[k] print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Ball: array[1..10] of integer; Begin Ball[1]:=42;Ball[2]:=25; Ball[3]:=13;Ball[4]:=18; Ball[5]:=15;Ball[6]:=55; Ball[7]:=48;Ball[8]:=13; Ball[9]:=64;Ball[10]:=45; m := Ball[1]; for k := 1 to 10 do if Ball[k] < m then begin m := Ball[k]; end; writeln(m); End.
| алг нач целтаб Ball[1:10] цел k, m Ball[1] := 42 Ball[2] := 25 Ball[3] := 13 Ball[4] := 18 Ball[5] := 15 Ball[6] := 55 Ball[7] := 48 Ball[8] := 13 Ball[9] := 64 Ball[10] := 45 m := Ball[1] нц для k от 1 до 10 если Ball[k] < m то m := Ball[k] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Ball[10] = {42, 25, 13, 18, 15, 55, 48, 13, 64, 45}; int m = Ball[0]; for (int k = 0; k < 10; k++) if (Ball[k] < m) m = Ball[k]; cout << m; return 0; } | |
В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] — второй и т.д.). Определите число, которое будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k, m, n AS INTEGER Dat(1) = 7: Dat(2) = 9 Dat(3) = 10: Dat(4) = 5 Dat(5) = 6: Dat(6) = 7 Dat(7) = 9: Dat(8) = 8 Dat(9) = 6: Dat(10) = 9 m = 10; n = 0 FOR k = 1 TO 10 IF Dat(k) <= m THEN m = Dat(k) n = k ENDIF NEXT k PRINT m | Dat = [7, 9, 10, 5, 6, 7, 9, 8, 6, 9] m = 10 n = 0 for k in range(0,10): if Dat[k] <= m: m = Dat[k] n = k + 1 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m, n: integer; Dat: array[1..10] of integer; Begin Dat[1] := 7; Dat[2] := 9; Dat[3] := 10; Dat[4] := 5; Dat[5] := 6; Dat[6] := 7; Dat[7] := 9; Dat[8] := 8; Dat[9] := 6; Dat[10] := 9; m := 10; n := 0; for k := 1 to 10 do if Dat[k] <= m then begin m := Dat[k]; n := k; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m, n Dat[1] := 7 Dat[2] := 9 Dat[3] := 10 Dat[4] := 5 Dat[5] := 6 Dat[6] := 7 Dat[7] := 9 Dat[8] := 8 Dat[9] := 6 Dat[10] := 9 m := 10 n := 0 нц для k от 1 до 10 если Dat[k] <= m то m := Dat[k] n := k все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {7, 9, 10, 5, 6, 7, 9, 8, 6, 9}; int m = 10; int n = 0; for (int k = 0; k < 10; k++) if (Dat[k] <= m) { m = Dat[k]; n = k + 1; } cout << m; return 0; } | |
В таблице Dat представлены данные о количестве голосов, поданных за 10 исполнителей народных песен (Dat[1] — количество голосов, поданных за первого исполнителя, Dat[2] — за второго и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 56: Dat(2) = 70 Dat(3) = 20: Dat(4) = 41 Dat(5) = 14: Dat(6) = 22 Dat(7) = 30: Dat(8) = 12 Dat(9) = 65: Dat(10) = 35 m = 0 FOR k = 1 TO 10 IF Dat(k) < 35 THEN m = m + 1 ENDIF NEXT k PRINT m | Dat = [56, 70, 20, 41, 14, 22, 30, 12, 65, 35] m = 0 for k in range (10): if Dat[k] < 35: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 56; Dat[2] := 70; Dat[3] := 20; Dat[4] := 41; Dat[5] := 14; Dat[6] := 22; Dat[7] := 30; Dat[8] := 12; Dat[9]:=65; Dat[10]:=35; m := 0; for k := 1 to 10 do if Dat[k] < 35 then begin m := m + 1; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m Dat[1] := 56 Dat[2] := 70 Dat[3] := 20 Dat[4] := 41 Dat[5] := 14 Dat[6] := 22 Dat[7] := 30 Dat[8] := 12 Dat[9] := 65 Dat[10] := 35 m := 0 нц для k от 1 до 10 если Dat[k] < 35 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {56, 70, 20, 41, 14, 22, 30, 12, 65, 35}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] < 35) m = m + 1; cout << m; return 0; } | |
В таблице Dat хранятся данные измерений среднесуточной температуры за неделю в градусах (Dat[1] — данные за понедельник, Dat[2] — за вторник и т.д.). Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(7) AS INTEGER DIM k, m AS INTEGER Dat(1) = −2: Dat(2) = −1 Dat(3) = 2: Dat(4) = 4 Dat(5) = 0: Dat(6) = −1 Dat(7) = −4 m = 0 FOR k = 1 TO 7 IF Dat(k) < 0 THEN m = m + 1 ENDIF NEXT k PRINT m | Dat = [−2, −1, 2, 4, 0, −1, −4] m = 0 for k in range(7): if Dat[k] < 0: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..7] of integer; Begin Dat[1] := −2; Dat[2] := −1; Dat[3] := 2; Dat[4] := 4; Dat[5] := 0; Dat[6] := −1; Dat[7] := −4; m := 0; for k := 1 to 7 do if Dat[k] < 0 then begin m := m + 1; end; writeln(m); End.
| алг нач целтаб Dat[1:7] цел k, m Dat[1] := −2 Dat[2] := −1 Dat[3] := 2 Dat[4] := 4 Dat[5] := 0 Dat[6] := −1 Dat[7] := −4 m := 0 нц для k от 1 до 7 если Dat[k] < 0 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[7] = {−2, −1, 2, 4, 0, −1, −4}; int m = 0; for (int k = 0; k < 7; k++) if (Dat[k] < 0) m = m + 1; cout << m; return 0; } | |
В таблице Dat хранятся данные о количестве сделанных учениками заданий (Dat[1] заданий сделал первый ученик, Dat[2] — второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k, m, n AS INTEGER Dat(1) = 7: Dat(2) = 9 Dat(3) = 10: Dat(4) = 5 Dat(5) = 6: Dat(6) = 7 Dat(7) = 5: Dat(8) = 8 Dat(9) = 6: Dat(10) = 9 m = 10; n = 0 FOR k = 1 TO 10 IF Dat(k) <= m THEN m = Dat(k) n = k ENDIF NEXT k PRINT n | Dat = [7, 9, 10, 5, 6, 7, 5, 8, 6, 9] m = 10 n = 0 for k in range(0,10): if Dat[k] <= m: m = Dat[k] n = k + 1 print (n)
|
| Паскаль | Алгоритмический язык |
Var k, m, n: integer; Dat: array[1..10] of integer; Begin Dat[1] := 7; Dat[2] := 9; Dat[3] := 10; Dat[4] := 5; Dat[5] := 6; Dat[6] := 7; Dat[7] := 5; Dat[8] := 8; Dat[9] := 6; Dat[10] := 9; m := 10; n := 0; for k := 1 to 10 do if Dat[k] <= m then begin m := Dat[k]; n := k; end; writeln(n); End.
| алг нач целтаб Dat[1:10] цел k, m, n Dat[1] := 7 Dat[2] := 9 Dat[3] := 10 Dat[4] := 5 Dat[5] := 6 Dat[6] := 7 Dat[7] := 5 Dat[8] := 8 Dat[9] := 6 Dat[10] := 9 m := 10 n := 0 нц для k от 1 до 10 если Dat[k] <= m то m := Dat[k] n := k все кц вывод n кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {7, 9, 10, 5, 6, 7, 5, 8, 6, 9}; int m = 10; int n = 0; for (int k = 0; k < 10; k++) if (Dat[k] <= m) { m = Dat[k]; n = k + 1; } cout << n; return 0; } | |
В таблице Dat представлены данные о количестве голосов, поданных за 10 исполнителей народных песен (Dat[1] — количество голосов, поданных за первого исполнителя, Dat[2] — за второго и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 56: Dat(2) = 70 Dat(3) = 20: Dat(4) = 41 Dat(5) = 14: Dat(6) = 22 Dat(7) = 30: Dat(8) = 12 Dat(9) = 65: Dat(10) = 35 m = 0 FOR k = 1 TO 10 IF Dat(k) > 25 THEN m = m + 1 ENDIF NEXT k PRINT m | Dat = [56, 70, 20, 41, 14, 22, 30, 12, 65, 35] m = 0 for k in range (10): if Dat[k] > 25: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 56; Dat[2] := 70; Dat[3] := 20; Dat[4] := 41; Dat[5] := 14; Dat[6] := 22; Dat[7] := 30; Dat[8] := 12; Dat[9]:=65; Dat[10]:=35; m := 0; for k := 1 to 10 do if Dat[k] > 25 then begin m := m + 1; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m Dat[1] := 56 Dat[2] := 70 Dat[3] := 20 Dat[4] := 41 Dat[5] := 14 Dat[6] := 22 Dat[7] := 30 Dat[8] := 12 Dat[9] := 65 Dat[10] := 35 m := 0 нц для k от 1 до 10 если Dat[k] > 25 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {56, 70, 20, 41, 14, 22, 30, 12, 65, 35}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] > 25) m = m + 1; cout << m; return 0; } | |
В таблице Dat хранятся данные измерений роста учеников 4 класса в сантиметрах. (Dat[1] — рост первого ученика, Dat[2] — второго и т.д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k, n, d AS INTEGER Dat(1) = 140: Dat(2) = 130 Dat(3) = 135: Dat(4) = 150 Dat(5) = 120: Dat(6) = 150 Dat(7) = 110: Dat(8) = 140 Dat(9) = 150: Dat(10) = 135 d = Dat(1); n = 1 FOR k = 2 TO 10 IF Dat(k) >= d THEN d = Dat(k) n = k ENDIF NEXT k PRINT n | Dat = [140, 130, 135, 150, 120, 150, 110, 140, 150, 135] d = Dat[0] n = 1 for k in range(1,10): if Dat[k] >= d: d = Dat[k] n = k + 1 print (n)
|
| Паскаль | Алгоритмический язык |
Var k, n, d: integer; Dat: array[1..10] of integer; Begin Dat[1]:=140; Dat[2]:=130; Dat[3]:=135; Dat[4]:=150; Dat[5]:=120; Dat[6]:=150; Dat[7]:=110; Dat[8]:=140; Dat[9]:=150; Dat[10]:=135; d := Dat[1]; n := 1; for k := 2 to 10 do if Dat[k] >= d then begin d := Dat[k]; n := k; end; writeln(n); End.
| алг нач целтаб Dat[1:10] цел k, n, d Dat[1] := 140 Dat[2] := 130 Dat[3] := 135 Dat[4] := 150 Dat[5] := 120 Dat[6] := 150 Dat[7] := 110 Dat[8] := 140 Dat[9] := 150 Dat[10] := 135 d := Dat[1] n := 1 нц для k от 2 до 10 если Dat[k] >= d то d := Dat[k] n := k все кц вывод n кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {140, 130, 135, 150, 120, 150, 110, 140, 150, 135}; int d = Dat[0]; int n = 1; for (int k = 1; k < 10; k++) if (Dat[k] >= d) { d = Dat[k]; n = k + 1; } cout << n; return 0; } | |
В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] — данные за первый день, Dat[2] — за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER 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 IF Dat(k) > m THEN m = Dat(k) ENDIF NEXT k PRINT m | Dat = [12, 15, 17, 15, 14, 12, 10, 13, 14, 15] m = 0 for k in range (10): if Dat[k] > m: m = Dat[k] print (m)
|
| Паскаль | Алгоритмический язык |
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] > m then begin m := Dat[k]; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m 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 нц для k от 1 до 10 если Dat[k] > m то m := Dat[k] все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {12, 15, 17, 15, 14, 12, 10, 13, 14, 15}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] > m) m = Dat[k]; cout << m; return 0; } | |
В таблице A хранятся данные о количестве учеников, опоздавших на занятия, за неделю (A[1] — данные за понедельник, A[2] — за вторник и т. д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM A(6) AS INTEGER DIM k, m, day AS INTEGER A(1) = 3: A(2) = 1 A(3) = 4: A(4) = 2 A(5) = 4: A(6) = 2 day = 1: m = A(1) FOR k = 2 TO 6 IF A(k) >= m THEN m = A(k) day = k ENDIF NEXT k PRINT day | A = [3, 1, 4, 2, 4, 2] day = 1 m = A[0] for k in range (1, 6): if A[k] >= m: m = A[k] day = k + 1 print (day)
|
| Паскаль | Алгоритмический язык |
Var k, m, day: integer; A: array[1..6] of integer; Begin A[1]:=3;A[2]:=1; A[3]:=4;A[4]:=2; A[5]:=4;A[6]:=2; day := 1; m := A[1]; for k := 2 to 6 do if A[k] >= m then begin m := A[k]; day := k; end; writeln(day); End.
| алг нач целтаб A[1:6] цел k, m, day A[1] := 3 A[2] := 1 A[3] := 4 A[4] := 2 A[5] := 4 A[6] := 2 day := 1 m := A[1] нц для k от 2 до 6 если A[k] >= m то m := A[k] day := k все кц вывод day кон |
| С++ | |
#include <iostream> using namespace std; int main() { int A[6] = {3, 1, 4, 2, 4, 2}; int day = 1; int m = A[0]; for (int k = 1; k < 6; k++) if (A[k] >= m) { m = A[k]; day = k + 1; } cout << day; return 0; } | |
В таблице Dat хранятся данные измерений среднесуточной температуры за 10 дней в градусах (Dat[1] — данные за первый день, Dat[2] — за второй и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(10) AS INTEGER DIM k,m AS INTEGER Dat(1) = 2: Dat(2) = 5 Dat(3) = 7: Dat(4) = 5 Dat(5) = 4: Dat(6) = 2 Dat(7) = 0: Dat(8) = 2 Dat(9) = 4: Dat(10) = 5 m = 0 FOR k = 1 TO 10 IF Dat(k) > 3 THEN m = m + 1 ENDIF NEXT k PRINT m | Dat = [2, 5, 7, 5, 4, 2, 0, 2, 4, 5] m = 0 for k in range(10): if Dat[k] > 3: m = m + 1 print (m)
|
| Паскаль | Алгоритмический язык |
Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[1] := 2; Dat[2] := 5; Dat[3] := 7; Dat[4] := 5; Dat[5] := 4; Dat[6] := 2; Dat[7] := 0; Dat[8] := 2; Dat[9] := 4; Dat[10] := 5; m := 0; for k := 1 to 10 do if Dat[k] > 3 then begin m := m + 1; end; writeln(m); End.
| алг нач целтаб Dat[1:10] цел k, m Dat[1] := 2 Dat[2] := 5 Dat[3] := 7 Dat[4] := 5 Dat[5] := 4 Dat[6] := 2 Dat[7] := 0 Dat[8] := 2 Dat[9] := 4 Dat[10] := 5 m := 0 нц для k от 1 до 10 если Dat[k] > 3 то m := m + 1 все кц вывод m кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[10] = {2, 5, 7, 5, 4, 2, 0, 2, 4, 5}; int m = 0; for (int k = 0; k < 10; k++) if (Dat[k] > 3) m = m + 1; cout << m; return 0; } | |
В таблице A хранятся данные о количестве призеров олимпиады по программированию по 9-ти округам Москвы. Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM A(9) AS INTEGER DIM k, score AS INTEGER A(1) = 9: A(2) = 11 A(3) = 7: A(4) = 12 A(5) = 13: A(6) = 5 A(7) = 9: A(8) = 3 A(9) = 4 score = 0 FOR k = 1 TO 9 IF A(k) < 9 THEN score = score + A(k) ENDIF NEXT k PRINT score | A = [9, 11, 7, 12, 13, 5, 9, 3, 4] score = 0 for k in range (9): if A[k] < 9: score = score + A[k] print (score)
|
| Паскаль | Алгоритмический язык |
Var k, score: integer; A: array[1..9] of integer; Begin A[1]:=9;A[2]:=11; A[3]:=7;A[4]:=12; A[5]:=13;A[6]:=5; A[7]:=9;A[8]:=3; A[9]:=4; score := 0; for k := 1 to 9 do if A[k] < 9 then begin score := score + A[k]; end; writeln(score); End.
| алг нач целтаб A[1:9] цел k, score A[1] := 9 A[2] := 11 A[3] := 7 A[4] := 12 A[5] := 13 A[6] := 5 A[7] := 9 A[8] := 3 A[9] := 4 score := 0 нц для k от 1 до 9 если A[k] < 9 то score := score + A[k] все кц вывод score кон |
| С++ | |
#include <iostream> using namespace std; int main() { int A[9] = {9, 11, 7, 12, 13, 5, 9, 3, 4}; int score = 0; for (int k = 0; k < 9; k++) if (A[k] < 9) score = score + A[k]; cout << score; return 0; } | |
В таблице Ball хранятся отметки по контрольной работе (Ball[1] — отметка 1 ученика, Ball[2] — отметка 2 ученика и т.д.). Определите, что будет напечатано в результате работы следующего алгоритма, записанного на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Ball(10) AS INTEGER DIM k, c AS INTEGER Ball(1) = 4: Ball(2) = 5 Ball(3) = 3: Ball(4) = 4 Ball(5) = 2: Ball(6) = 5 Ball(7) = 4: Ball(8) = 3 Ball(9) = 4: Ball(10) = 5 c = 0 FOR k = 1 TO 10 IF Ball(k) > 4 THEN c = c + 1 ENDIF NEXT k PRINT c | Ball = [4, 5, 3, 4, 2, 5, 4, 3, 4, 5] c = 0 for k in range (10): if Ball[k] > 4: c = c + 1 print (c)
|
| Паскаль | Алгоритмический язык |
Var k, c: integer; Ball: array[1..10] of integer; Begin Ball[1]:=4;Ball[2]:=5; Ball[3]:=3;Ball[4]:=4; Ball[5]:=2;Ball[6]:=5; Ball[7]:=4;Ball[8]:=3; Ball[9]:=4;Ball[10]:=5; c := 0; for k := 1 to 10 do if Ball[k] > 4 then begin c := c + 1; end; writeln(c); End.
| алг нач целтаб Ball[1:10] цел k, c Ball[1] := 4 Ball[2] := 5 Ball[3] := 3 Ball[4] := 4 Ball[5] := 2 Ball[6] := 5 Ball[7] := 4 Ball[8] := 3 Ball[9] := 4 Ball[10] := 5 c := 0 нц для k от 1 до 10 если Ball[k] > 4 то c := c + 1 все кц вывод c кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Ball[10] = {4, 5, 3, 4, 2, 5, 4, 3, 4, 5}; int c = 0; for (int k = 0; k < 10; k++) if (Ball[k] > 4) c = c + 1; cout << c; return 0; } | |
В таблице Dat хранятся данные ежедневных измерений температуры воздуха (Dat[1] — температура в понедельник, Dat[2] — во вторник и т.д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на пяти языках программирования.
| Бейсик | Python |
|---|---|
DIM Dat(7) AS INTEGER DIM k, day AS INTEGER Dat(1) = 9: Dat(2) = 11 Dat(3) = 10: Dat(4) = 13 Dat(5) = 8: Dat(6) = 5 Dat(7) = 11 day = 0 FOR k = 1 TO 7 IF Dat(k) <= 10 THEN day = day + 1 ENDIF NEXT k PRINT day | Dat = [9, 11, 10, 13, 8, 5, 11] day = 0 for k in range(7): if Dat[k] <= 10: day = day + 1 print (day)
|
| Паскаль | Алгоритмический язык |
Var k, day: integer; Dat: array[1..7] of integer; Begin Dat[1] := 9; Dat[2] := 11; Dat[3] := 10; Dat[4] := 13; Dat[5] := 8; Dat[6] := 5; Dat[7] := 11; day := 0; for k := 1 to 7 do if Dat[k] <= 10 then begin day := day + 1; end; writeln(day); End.
| алг нач целтаб Dat[1:7] цел k, day Dat[1] := 9 Dat[2] := 11 Dat[3] := 10 Dat[4] := 13 Dat[5] := 8 Dat[6] := 5 Dat[7] := 11 day := 0 нц для k от 1 до 7 если Dat[k] <= 10 то day := day + 1 все кц вывод day кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[7] = {9, 11, 10, 13, 8, 5, 11}; int day = 0; for (int k = 0; k < 7; k++) if (Dat[k] <= 10) day = day + 1; cout << day; return 0; } | |
В таблице Dat хранятся данные измерений среднесуточной температуры за неделю в градусах (Dat[1] — данные за понедельник, Dat[2] — за вторник и т.д.). Определите число, которое будет напечатано в результате выполнения следующего алгоритма, записанного на пяти алгоритмических языках.
| Бейсик | Python |
|---|---|
DIM Dat(7) AS INTEGER DIM k, m, day AS INTEGER 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) FOR k = 2 TO 7 IF Dat(k) < m THEN day = k m = Dat(k) ENDIF NEXT k PRINT day | Dat = [7, 9, 10, 8, 6, 7, 6] day = 1 m = Dat[0] for k in range(1,7): if Dat[k] < m: day = k + 1 m = Dat[k] print (day)
|
| Паскаль | Алгоритмический язык |
Var k, m, day: integer; Dat: array[1..7] of integer; Begin 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]; for k := 2 to 7 do if Dat[k] < m then begin day := k; m := Dat[k]; end; writeln(day); End.
| алг нач целтаб 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 то day := k m := Dat[k] все кц вывод day кон |
| С++ | |
#include <iostream> using namespace std; int main() { int Dat[7] = {7, 9, 10, 8, 6, 7, 6}; int day = 1; int m = Dat[0]; for (int k = 1; k < 7; k++) if (Dat[k] < m) { day = k + 1; m = Dat[k]; } cout << day; return 0; } | |
Пройти тестирование по этим заданиям
Число 80 тоже входит в алгоритм и поэтому ответ 24.
80 < 80 − неверно.