?>
Тестовые задания Как называется операция, используемая присоставлении программы, которая увеличиваетзначение переменной на определенное число?A. ИнструментБ. ИнкрементB. ДекрементГ. ДивидендТестовые заданияКак называется операция, используемая присоставлении программы, которая увеличиваетзначение переменной на определенное число?A. ИнструментБ. ИнкрементB. ДекрементГ. Дивиденд
Ответы
Const n=50;
Var A:array[1..n] of integer;
i,c,l:integer;
Begin
for i:=1 to n do readln(A[i]);
c:=0;
for i:=1 to n do if A[i] mod 2 = 0 then c:=c+1;
writeln(c);
readln;
end.
Program BiFi;
Const n=50;
Var A:array[1..n] of integer;
i,k,l:integer;
Begin
k:=0;
l:=0;
for i:=1 to n do begin readln(a[i]);
if A[i]<0 then k:=k+1
else if A[i]>0 then l:=l+1;
end;
if k>l then writeln('больше положительных')
else if l>k then writeln('больше отрицательных')
else writeln('одинаково');
readln;
end.