РЕШУ ОГЭ — информатика

Задания

В таблице Dat хранятся данные измерений роста учеников 4 класса в сантиметрах. (Dat[1] − рост первого ученика, Dat[2] − второго и т. д.). Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на трех языках программирования.

Алгоритмический язык
алг нач целтаб Dat[1:10] цел k, n, d Dat[1] := 120; Dat[2] := 130 Dat[3] := 110; Dat[4] := 150 Dat[5] := 120; Dat[6] := 150 Dat[7] := 110; Dat[8] := 140 Dat[9] := 135; Dat[10] := 150 n := 1; d := Dat[1] нц для k от 2 до 10 если Dat[k] < d то d := Dat[k] n := k все кц вывод n кон
Бейсик	Паскаль
DIM Dat(10) AS INTEGER DIM k, n, d AS INTEGER Dat(1) = 120: Dat(2) = 130 Dat(3) = 110: Dat(4) = 150 Dat(5) = 120: Dat(6) = 150 Dat(7) = 110: Dat(8) = 140 Dat(9) = 135: Dat(10) = 150 n = 1: d = Dat(1) FOR k = 2 TO 10 IF Dat(k) < d THEN d = Dat(k) n = k END IF NEXT k PRINT n END	var k, n, d: integer; Dat: array[1..10] of integer; begin Dat[1] := 120; Dat[2] := 130; Dat[3] := 110; Dat[4] := 150; Dat[5] := 120; Dat[6] := 150; Dat[7] := 110; Dat[8] := 140; Dat[9] := 135; Dat[10] := 150; n := 1; d := Dat[1]; for k := 2 to 10 do if Dat[k] < d then begin d := Dat[k]; n := k end; write(n); end.

Решение.

Это задание ещё не решено, приводим решение прототипа.

В таблице 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; }

Программа предназначена для нахождения номера ученика с наибольшим ростом. Если несколько учеников имеют одинаковый рост, то берется последний по порядку из таких учеников. Проанализировав входные данные, приходим к выводу, что ответ 9.

Ответ: 9.

Ключ