На фото номер 17
а)110111
б)10100
в)1110007
номер 16
Вроде бы так... подправь если что)
uses crt;
const N=10;
var i,p:integer; a:array[1..N] of integer; {кол эл массива }
begin
p:=0;
writeln('введите исходный массив');
for i:=1 to N do {цикл по кол э}
begin
write('a[',i,']='); readln(a[i]); {ввод эл массива}
if (a[i] mod 2)=0 then p:=p+1;
end;
write('p='); writeln(p);
readln
end.
График Скорость Время
а 200км/ч 30 минут
b 100км/ч 1 час
c 25 км/ч 4 часа
d 16,66 км/ч 6 часов
е 5км/ч 6 часов
<span>a:=g m2-m1/m2+m1</span>Если в Паскале, а в visual basic без <u>:</u><span>
</span>