Ярослав Галкин/ Апрель 8, 2018/ ОГЭ-10/ 0 комментариев

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

 

Алгоритмический язык

Бейсик

 алг

  нач
целтаб Ball[1:10] цел k, c
Ball[1] := 4; Ball[2] := 5
Ball[3] := 3; Ball[4] := 4
Ball[5] := 2; Ball[6] := 5
Ball[7] := 4; Ball[8] := 3
Ball[9] := 4

  Ball[10] := 5

  c := 0
нц для k от 1 до 10
если Ball[k] > 4 то
c := c + 1
все
кц
вывод c
кон

DIM Ball(10) AS INTEGER
DIM k, c AS INTEGER
Ball(1) = 4: Ball(2) = 5
Ball(3) = 3: Ball(4) = 4
Ball(5) = 2: Ball(6) = 5
Ball(7) = 4: Ball(8) = 3
Ball(9) = 4: Ball(10) = 5
c = 0
FOR k = 1 TO 10
IF Ball(k) > 4 THEN
c = c + 1
END IF
NEXT k
PRINT c
END

Паскаль

var k, c: integer;
Ball:array[1..10] of integer;
begin
c := 0;
Ball[1] := 4; Ball[2] := 5;
Ball[3] := 3; Ball[4] := 4;
Ball[5] := 2; Ball[6] := 5;
Ball[7] := 4; Ball[8] := 3;
Ball[9] := 4; Ball[10] := 5;
for k := 1 to 10 do
if Ball[k] >4 then
c := c + 1;
write(c);
end.

Если вы нашли ошибку, пожалуйста, выделите фрагмент текста и нажмите Ctrl+Enter.

Добавить комментарий

Этот сайт использует Akismet для борьбы со спамом. Узнайте как обрабатываются ваши данные комментариев.