Сканируется цветное изображение размером 10 х 10 см. разрешающая сканера -- 600 х 1200 dpi , глубина цвета --3 байта.какой информационный объем будет иметь полученный графический файл?
Алгоритм оказания первой что при оказании первой вам ничего не угрожает и вы не подвергаете себя опасности.Обеспечить безопасность пострадавшему и окружающим (например, извлечь пострадавшего из горящего автомобиля).Проверить наличие у пострадавшего признаков жизни (пульс, дыхание, реакция зрачков на свет) и сознания. Для проверки дыхания необходимо запрокинуть голову пострадавшего, наклониться к его рту и носу и попытаться услышать или почувствовать дыхание. Для обнаружения пульса необходимо приложить подушечки пальцев к сонной артерии пострадавшего. Для оценки сознания необходимо (по возможности) взять пострадавшего за плечи, аккуратно встряхнуть и задать какой-либо вопрос.
forwandy42
23.12.2021
// PascalABC.NET 3.3, сборка 1634 от 14.02.2018 // Внимание! Если программа не работает, обновите версию!
begin var (s,x):=(ReadlnString('Введите число, можно нецелое:'),0.0); if TryStrToFloat(s,x) then if s.Where(c-> c in ['0'..'9']).Select(c->c.ToDigit).Sum mod 10=5 then Writeln('Сумма цифр заканчивается на 5') else Writeln('Сумма цифр не заканчивается на 5') else Writeln('Неверное представление числа') end.
Примеры Введите число, можно нецелое: -3532175 Сумма цифр не заканчивается на 5
Введите число, можно нецелое: 0.02432413 Сумма цифр не заканчивается на 5
Введите число, можно нецелое: -13.05360214 Сумма цифр заканчивается на 5
Введите число, можно нецелое: 1.23007e-31 Сумма цифр не заканчивается на 5
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Сканируется цветное изображение размером 10 х 10 см. разрешающая сканера -- 600 х 1200 dpi , глубина цвета --3 байта.какой информационный объем будет иметь полученный графический файл?