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

Задания

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

Алгоритмический язык
алг нач целтаб 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 кон
Бейсик	Паскаль
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) END IF NEXT k PRINT m END	var k, m, t: 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 m := Ball[k]; write(m); end.

Решение.

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

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

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

Ответ: 13.

Ключ