Сканируется цветное изображение размером 45, 72 х 45, 72 дюйм. Разрешающая сканера1200 x 1200 dpi, глубина цвета — 4 бита. Какой информационный объём будет иметь полученныйграфический файл?ответ: в битах​

Ваша программа:

mas = [3,5,67,-65,34,21] # задаем список

print(mas)

point=3 # задаем искомое значение

l = len(mas) # вычисляем длину списка (количество элементов)

for i in range( l ):

   if mas [i]==point:

       print("Содержит")

       break

   else:

       print ("Не содержит")

Можно ещё так записать:

mas = [3,5,67,-65,34,21] # задаем список

print(mas)

point=3 # задаем искомое значение

for i in mas: #смотрим каждый элемент в массиве

   if i == point:

       print("Содержит")

       break

   else:

       print ("Не содержит")

Можно написать так, что более понятно:

mas = [3,5,67,-65,34,21] # задаем список

print(mas)

point=3 # задаем искомое значение

if point in mas:

   print("Содержит")

else:

   print ("Не содержит")

Program zadacha3;
var V, Vo,a ,b, t, c, H: integer;
begin
  writeln('моя программа вычисляет скорость при равноускоренном движении');
  writeln('введите начальную скорость');
  readln(a);
  writeln('введите ускорение');
  readln(a);
  writeln('введите время');
  readln(t);
  writeln('введите шаг');
  readln(H);
  for b:=t to c do
    begin
      t:=t+H;
      V:=Vo+a*t;
    end;
  writeln('скорость равна V:= ',V);
end.

После эндом на закрытии цикла не стояло точки с запятой, и где у тебя написано в третей строчке снизу 7V, что это я так и не понял? Я убрал оттуда семёрку, если не так то поменяй, я в формулу не вдавался.
И у тебя ответ в цикле стоит я не знаю так должно быть или нет, обрати внимание на это, в своём варианте я переставил ответ на после цикла