Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
DashaHB16
03.09.2020 07:38 •
Информатика
Через программу Python нужно вычислить сколько дней в году (нужен скрин результата)
👇
Увидеть ответ
Открыть все ответы
Ответ:
Марано
03.09.2020
//Блок-схема во вложении
//Pascal ABC.NET 3.1 сборка 1219
uses
system;
Var
d1,d2:datetime;
a:integer;
begin
writeln('1 дата:');
write('День:');readln(a);d1:=d1.AddDays(a);
write('Месяц:');readln(a);d1:=d1.AddMonths(a);
write('Год:');readln(a);d1:=d1.AddYears(a);
writeln('2 дата:');
write('День:');readln(a);d2:=d2.AddDays(a);
write('Месяц:');readln(a);d2:=d2.AddMonths(a);
write('Год:');readln(a);d2:=d2.AddYears(a);
writeln('Res:',abs((d2-d1).Days));
end.
Пример ввода:
1 дата:
День:1
Месяц:1
Год:1998
2 дата:
День:2
Месяц:1
Год:1999
Пример вывода:
Res:366
4,4
(54 оценок)
Ответ:
привет6365
03.09.2020
1) 64*32/8/1024 = 0,25 кб; 1 / 0,25 = 4 бит пиксель; 2^4 = 16 цветов.
2) 50*80*(ln(16)/ln(2)) = 16000 бит; 16000 / 8 = 2000 байт.
3) 64*64*(ln(256)/ln(2)) = 32768 бит / 8 / 1024 = 4 кбайт минимум.
4) 2048*1536*3 байт пиксель = 9437184 байт / 8 / 1024 = 1152 кбайт.
5) (ln(256)/ln(2)) / (ln(2)/ln(2)) =8 раз меньше стал; (текущий уменьшенный вес файла + 70 байт) * 8 =~ 560 байт если весил 1 байт.
6) (ln(64)/ln(2)) / (ln(8)/ln(2)) = 2 раза.
7) (ln(1024)/ln(2)) / (ln(32)/ln(2)) = 2 раза.
8) 32*64/8 = 256; 512 байт / 256 = 2 бит пикс; 2^2 = 4 цветов.
9) 128*128/8/1024 = 2; 4 кб / 2 = 2 бит пикс; 2^2 = 4 цветов.
10) 1024*768*16 бит пикс = 12582912 бит / 8 / 1024 / 1024 = 1,5 мбайт.
11) 1024*512/8/1024 = 64; 256 кб / 64 = 4 бит пикс; 2^4 = 16 цветов.
12) 32*128*(ln(64)/ln(2)) бит = 24576 бит / 8 / 1024 = 3 кбайта.
13) 2^24 = 16 777 216 цветов; 1240*1024*(ln(16777216)/ln(2)) бит пикс = 30474240 бит / 8 / 1024 = 3720 кбайт для одной страницы требуется.
4,6
(13 оценок)
Это интересно:
Х
Хобби-и-рукоделие
01.01.2022
Как сделать купальник: советы от профессионала...
К
Компьютеры-и-электроника
15.06.2021
Как открыть программу Terminal на Mac...
К
Компьютеры-и-электроника
01.03.2023
Как войти в Windows со стандартным паролем администратора...
И
Искусство-и-развлечения
01.04.2021
Как научиться петь: советы для начинающих...
О
Образование-и-коммуникации
03.02.2023
Как правильно сказать привет на китайском языке: все, что нужно знать...
Х
Хобби-и-рукоделие
10.07.2021
Игра в Джекс: правила и стратегии...
С
Стиль-и-уход-за-собой
19.08.2022
Как сделать бальзам для губ из вазелина: домашний рецепт...
С
Семейная-жизнь
13.11.2020
Как стать лучшей сестрой: советы от реальных девушек...
К
Компьютеры-и-электроника
09.12.2022
Как взломать Wi-Fi сеть (WEP) с помощью Airoway и Wifislax...
О
Образование-и-коммуникации
08.01.2020
Как стать интересным: советы и рекомендации...
Новые ответы от MOGZ: Информатика
lolologhka
30.08.2021
Для выражение левого столбца найдите соотвествующие выражение в правом столбце...
romanchuzhekov
03.04.2022
Алгоритм работы автосерфинга, как работает программа для серфинга сайтов, пример livesurf, redsurf, websurf...
abdullaevs04
04.11.2020
1.Найдите значение переменной x после выполнения фрагмента программы: var x:integer; begin x:=2; x:=2*x-5; x:=x+10; Write(x); end. 1) 13; 2) 9; 3) 5; 4)11. 2. Запишите...
тиматимуша
08.05.2020
Распечатать на паскале первые nчетных чисел,заранее пасибо...
PEWALWIK
22.09.2021
Тема: построение циклических алгоритмов 1)для всех чисел от -5 до 60 найти и вывести их кубы. 2)найдите сумму нечетных чисел 1 до 100. 3)подсчитать количество всех...
limka5180
11.12.2021
Информационный вес одного символа в некотором сообщении равен 6 бит. найти: 1)мощность алфавита, с которого составлен этот текст. 2)информационный объем одной страницы,...
mashalin44
01.04.2023
Обчисліть об єм циліндра, якщо задані радіус основи, висота циліндра...
221199cs
01.07.2021
5 он маленький вычислите 00^2×0^2...
Max010507
28.09.2021
Сверху что в 1)нужно их нарисовать в кумире 2)сделать калькулятор ...
alinkaaa3
08.07.2021
Статья, помещенная в журнале, занимает 8 страниц, на каждой странице 25 строк, в каждой строке 150 символов. каков объем информации в статье? ...
MOGZ ответил
Зведіть подвбні доданки -7х+5у-3у+7х+2т...
Розв яжіть рівняння 8^-x=16...
Найдите площадь листа формата А1.ответ дайте в квадратных сантиметрах,...
Гений русской литературы (по стихотворению М.Ю. Лермонтова «Смерть...
Fill in me, us, you, him, her, them. 1. Pete went to school by...
Установите соответствие между металлом и его характеристикой:...
Розібрати реакції за типами: розпаду, сполучення, заміщення чи...
Описати природу верховини ....
Он любил музыку, и у него была музыкальная душа. ВЫДЕЛИТЕ ГРАММАТИЧЕСКУЮ...
Русская культура и культура народов России. Сделайте сообщение...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
//Pascal ABC.NET 3.1 сборка 1219
uses
system;
Var
d1,d2:datetime;
a:integer;
begin
writeln('1 дата:');
write('День:');readln(a);d1:=d1.AddDays(a);
write('Месяц:');readln(a);d1:=d1.AddMonths(a);
write('Год:');readln(a);d1:=d1.AddYears(a);
writeln('2 дата:');
write('День:');readln(a);d2:=d2.AddDays(a);
write('Месяц:');readln(a);d2:=d2.AddMonths(a);
write('Год:');readln(a);d2:=d2.AddYears(a);
writeln('Res:',abs((d2-d1).Days));
end.
Пример ввода:
1 дата:
День:1
Месяц:1
Год:1998
2 дата:
День:2
Месяц:1
Год:1999
Пример вывода:
Res:366