for n:=1 to 9 do for k:=1 to 9 do A[n,k ]:=n+k*2 сколько элементов массива А примут четное значение
10-11 класс
|
т.к. к * 2 это всегда четное число, то будет ли число четное зависит только от n
получается для всех четных n числа будут четные,т.е. для
n = 2
n = 4
n = 6
n = 8
т.е. таких n всего 4 а для каждого n формируется 9 чисел с помощью второго цикла
поэтому получаем 4 * 9 = 36
Другие вопросы из категории
МИ ЗНАЧЕНИЯМИ . ДОПОЛНИТЕЛЬНЫЙ МАССИВ ИСПОЛЬЗОВАТЬ НЕ РАЗРЕШАЕТСЯ ) .........ЕСЛИ МОЖЕТИ ПОЯСНИТЕ СЛОВАМИ ЧТО ДЕЛАЕТ ПРОГРАММА
Читайте также
For i:= 0 to 14 do A[i]:= A[i+1]
Задание то же самое, что и в предыдущем.
2. Дан фрагмент программы, обрабатывающий одномерный массив k размером n.
k:= A[i];
For i:= 1 to n-1 do A[i]:=A[i+1];
A[n]:= k;
Что делает данный алгоритм?
while n>0 do begin k:=n mod 10; n:=n div 10; inc (a[k]); end; for j:=0 to 9 do if a[j].0 then writeln (j, a[j]); for j:=0 to 9 do if a[j]=0 then writeln(j); end.
значение переменной S:
100 doA[i] : = i*i;for i : = 1 to 100 doB[i] : = A[i]-100;Сколько положительных значений будет в массиве B?
var n,k,i,t:integer; f:text;
begin
assign(f,'f1.txt');
rewrite(f);
readln (n);
for i:=2 to n do begin
t:=0;
for k:=2 to n do
if i mod k=0 then t:=t+1;
if t=1 then write(f,i:3);
end;
close(f);
end.