Ответы
Сердечно мышцы называют:
3) миокардом
Венозная кровь в сердце проходит через:
3) правые желудочек и предсердие
Кровь от органов в сердце поступает в:
2) правое предсердие
Тонкую и малоэластичнкую стенку имеют:
4) вены
Сердечный цикл начинается с:
1) систолы предсердий
Верны ли следующие утверждения?
А) Из внешних кровотечений самое опасное – артериальное.
Б) Венозное кровотечение останавливается с помощью жгута
1) верно только А
Ток лимфы по лимфатическим сосудам НЕ обеспечивается:
2) сокращением сердца
Дыхательный центр, управляющий работой органов дыхания, находится в:
1) продолговатом мозге
Голосовые связки находятся в:
2) ротовой полости
Атмосферный воздух при вдохе сначала попадает в:
2) носоглотку
В процессе пищеварения белки распадаются до:
2) аминокислот
Длина пищеварительного тракта в среднем составляет:
4) 7 м
Верны ли следующие утверждения?
А) Всасывание питательных веществ в организме человека происходит в основном в тонкой кишке.
Б) Внутренняя стенка пищевода выстлана соединительной тканью
1) верно только А
В ротовой полости начинается процесс переваривания:
3) углеводов
Компонентом желудочного сока является:
2) соляная кислота
Усиление слюноотделения в ротовой полости НЕ связано с:
4) раздражением пищей рецепторов желудка
Цинга – заболевание, возникающее вследствие недостатка витамина:
1) С
Выделительную функцию в организме НЕ выполняют:
2) печень
Первичная моча отличается от вторичной:
4) большей концентрацией мочевины
Возможно, так, как сделал я - не совсем то, что хотел от вас преподаватель. Но программа работает как надо по вашему заданию. При чем вводить можно даже числа из девяти знаков
function checkstr( x: string ): boolean; // это функция, которая проверяет введенное пользователем на то, является ли это целым положительным числом, а не какими-нибудь буквами begin var k: integer; if length(x) > 0 then begin Result := True; for k := 1 to length(x) do if not (x[k] in ['0'..'9']) then begin Result := False; // если пользователь ничего не ввел или ввел не цифры, то будет возвращена ложь end;end;end;
var N: string; error, r, i, min: integer; B: array[1..8] of integer; // В - массив, в котором будут храниться все цифры введенного числа begin write('Введите целое положительное число: '); readln(N); if checkstr(N) then begin // вызываем нашу функцию на обработку введенных данных r := Length(N); // присваиваем переменной r размер введенной строки val( N[ 1 ], min, error); // конвертирует строковое значение в тип integer и присваиваем минимальному значению первую цифру for i := 2 to r do begin val( N[ i ], B[ i ], error ); // конвертируем строковые цифры в integer if ( B[i] < min ) AND ( B[i] mod 2 <> 0) then min := B[i]; // если цифра нечетная и меньше переменной min , то присвоить переменной min значение этой цифры if ( min mod 2 = 0 ) then min := B[i]; // проверяем на всякий случай еще раз первую цифру end; if ( min mod 2 = 0 ) then writeln('Нечетных цифр нет') // если нечетных цифр нет, а наименьшая цифра четная, то говорим, что нечетных цифр нет else writeln( 'Наименьшая нечетная цифра в числе: ', min ); // выводим наименьшую нечетную цифру из числа end else writeln('Неверный формат ввода'); // если пользователь вдруг ввел буквы или какие-нибудь каракули вместо целого числа end.
Возможно, так, как сделал я - не совсем то, что хотел от вас преподаватель. Но программа работает как надо по вашему заданию. При чем вводить можно даже числа из девяти знаков
function checkstr( x: string ): boolean; // это функция, которая проверяет введенное пользователем на то, является ли это целым положительным числом, а не какими-нибудь буквами begin var k: integer; if length(x) > 0 then begin Result := True; for k := 1 to length(x) do if not (x[k] in ['0'..'9']) then begin Result := False; // если пользователь ничего не ввел или ввел не цифры, то будет возвращена ложь end;end;end;
var N: string; error, r, i, min: integer; B: array[1..8] of integer; // В - массив, в котором будут храниться все цифры введенного числа begin write('Введите целое положительное число: '); readln(N); if checkstr(N) then begin // вызываем нашу функцию на обработку введенных данных r := Length(N); // присваиваем переменной r размер введенной строки val( N[ 1 ], min, error); // конвертирует строковое значение в тип integer и присваиваем минимальному значению первую цифру for i := 2 to r do begin val( N[ i ], B[ i ], error ); // конвертируем строковые цифры в integer if ( B[i] < min ) AND ( B[i] mod 2 <> 0) then min := B[i]; // если цифра нечетная и меньше переменной min , то присвоить переменной min значение этой цифры if ( min mod 2 = 0 ) then min := B[i]; // проверяем на всякий случай еще раз первую цифру end; if ( min mod 2 = 0 ) then writeln('Нечетных цифр нет') // если нечетных цифр нет, а наименьшая цифра четная, то говорим, что нечетных цифр нет else writeln( 'Наименьшая нечетная цифра в числе: ', min ); // выводим наименьшую нечетную цифру из числа end else writeln('Неверный формат ввода'); // если пользователь вдруг ввел буквы или какие-нибудь каракули вместо целого числа end.
Сердечно мышцы называют:
3) миокардом
Венозная кровь в сердце проходит через:
3) правые желудочек и предсердие
Кровь от органов в сердце поступает в:
2) правое предсердие
Тонкую и малоэластичнкую стенку имеют:
4) вены
Сердечный цикл начинается с:
1) систолы предсердий
Верны ли следующие утверждения?
А) Из внешних кровотечений самое опасное – артериальное.
Б) Венозное кровотечение останавливается с помощью жгута
1) верно только А
Ток лимфы по лимфатическим сосудам НЕ обеспечивается:
2) сокращением сердца
Дыхательный центр, управляющий работой органов дыхания, находится в:
1) продолговатом мозге
Голосовые связки находятся в:
2) ротовой полости
Атмосферный воздух при вдохе сначала попадает в:
2) носоглотку
В процессе пищеварения белки распадаются до:
2) аминокислот
Длина пищеварительного тракта в среднем составляет:
4) 7 м
Верны ли следующие утверждения?
А) Всасывание питательных веществ в организме человека происходит в основном в тонкой кишке.
Б) Внутренняя стенка пищевода выстлана соединительной тканью
1) верно только А
В ротовой полости начинается процесс переваривания:
3) углеводов
Компонентом желудочного сока является:
2) соляная кислота
Усиление слюноотделения в ротовой полости НЕ связано с:
4) раздражением пищей рецепторов желудка
Цинга – заболевание, возникающее вследствие недостатка витамина:
1) С
Выделительную функцию в организме НЕ выполняют:
2) печень
Первичная моча отличается от вторичной:
4) большей концентрацией мочевины