Информатика (Циклический алгоритм обработки массива чисел, записанный на алгоритмическом языке)

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

Регистрация


Зарегистрироваться через VK

Личный кабинет

Регистрация
Войти через VK