Информатика (Циклический алгоритм обработки массива чисел, записанный на алгоритмическом языке)
В таблице 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 namespacestd; 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; } |
|