В таблице 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; } | |
Программа предназначена для нахождения последнего дня, в который из аэропорта отправилось минимальное количество самолетов. Проанализировав входные данные, приходим к выводу, что ответ 6.