№1) Что выведет на экран данная программа? Var k, m: integer; Dat: array[1..10] of integer; Begin Dat[
№1)
Что выведет на экран данная программа?
Var k, m: integer;
Dat: array[1..10] of integer;
Begin
Dat[1] := 12; Dat[2] := 15;
Dat[3] := 17; Dat[4] := 15;
Dat[5] := 14; Dat[6] := 12;
Dat[7] := 10; Dat[8] := 13;
Dat[9] := 14; Dat[10] := 15;
m := 0;
for k := 1 to 10 do
if Dat[k] = 15 then
begin
m := m+1;
end;
writeln(m);
End.
.....
№2)
Чему равны элементы массива В?
var
B: array[1..5] of integer;
i:integer;
begin
for i:=1 to 5 do
if i mod 2 = 0 then a[i]:=5
else a[i]:=10;
end.
Выберите один или несколько ответов:
a. Все элементы массива имеют разное значение
b. Элементы равны 5 10 5 10 5
c. Сумма элементов делится на каждый из элементов массива без остатка
d. Элементы равны 10 5 10 5 10
e. Сумма элементов массива делится на 15
......
№3)
"разнотипных" "понятие" "значение номер мнение имя расположение однотипных
Массив - это совокупность "......" элементов, имеющих общее "......"
, но у каждого свое "......" .
Гость
Ответ(ы) на вопрос:
Гость 1) Вычисляется кол-во элементов массива равных 15
2) d. Элементы равны 10 5 10 5 10, потому что 1 - нечетное
3) Массив - это совокупность "пронумерованных" элементов, имеющих общее "тип" , но у каждого свое "значение" .
Не нашли ответ?
Похожие вопросы