Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
fereela
14.03.2022 21:44 •
Информатика
Как поставить колонтитул верхний и при том чтобы цифры менялись? Подскажите
👇
Увидеть ответ
Открыть все ответы
Ответ:
Марано
14.03.2022
//Блок-схема во вложении
//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
14.03.2022
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 оценок)
Это интересно:
З
Здоровье
21.04.2021
Как распознать экзему: симптомы и признаки...
О
Образование-и-коммуникации
26.04.2020
Лучшие способы самостоятельно создать аэрогель...
Х
Хобби-и-рукоделие
14.04.2021
Завязывание скользящих узлов на ожерелье: профессиональный подход...
К
Компьютеры-и-электроника
27.01.2020
Изучаем, как создавать формы в HTML: полное руководство...
К
Компьютеры-и-электроника
09.04.2021
Как блокировать доступ к YouTube для детей и сотрудников...
З
Здоровье
21.10.2022
Опасный гость - как определять и лечить укусы паука отшельника...
К
Кулинария-и-гостеприимство
06.01.2022
Мастер-класс: как правильно готовить спаржу на плите...
З
Здоровье
13.09.2021
Как избавиться от большого волдыря за короткий промежуток времени...
И
Искусство-и-развлечения
20.02.2022
Как узнать своих персонажей: советы для писателей...
Т
Транспорт
26.01.2020
Как смазать велосипедную втулку: простые советы от эксперта...
Новые ответы от MOGZ: Информатика
yasya142
20.02.2021
Закончите определение. фонетика-это раздел науки имя существительное-это самостоятельная часть глагол-это самостоятельная часть тяжелая промышленность- легкая промышленность-...
NikitaAleksandrov09
12.04.2021
Укажите значения переменных k, l, m, n, при которых логическое выражение (¬(m vl) /\k)→((¬k /\¬m) \/n) ложно. ответ запишите в виде строки из четырех символов: значений переменных...
DimaRostovonDon
02.07.2020
. Составить таблицу истинности логического выражения B (¬A¬B)...
JuliaFlar
15.11.2022
Выбери виды компьютерных сетей ПО типу среды передачи данных...
Dasharozzz321
25.01.2023
Составьте алгоритм суммирования чисел от 41 по 513. 2. Составьте блок-схему произведения чисел от 11 по 23. 3. Составте программу, которая определяет наибольшего из чисел х и у....
bolatzarina
25.04.2022
перевести с десятичной системы счисления (с.с) на двоичную с.с 151 223 445 34 57 69 86 ответьте...
olkvochka1707
03.02.2021
Какие антивирусные программы наиболее часто используются? Какие антивирусные программы вы применяете на своем компьютере? Существует ли такая вероятность, что та или иная антивирусная...
gfyyfyftd
05.04.2020
Жеке сымсыз байланыс желілерін тиісті сипаттамаларымен сәйкестендір. информатика...
razebal
04.07.2022
Тестовые задания для самоконтроля 1. Какое из следующих утверждений точнее всего раскрывает смысл понятия «информация» с обыденной точки зрения? а) последовательность знаков некоторого...
egorbud5
27.10.2022
Название кратковременной памяти У МЕНЯ СОЧ]...
MOGZ ответил
Мақал-мәтелдерді оқыңдар. Қандай ой айтылған?Оқылым мәтінмен байланыс бар ма?...
история 6 класс агибалова, донской, параграф первый, краткое содержание по частям...
10. а) –2а + 5,2, якщо a = -3; ...
Подайте в метрах за секунду 48см/хв 5.2км/хв...
В реченні: сніжинки кружляючи падали нв землю, підкреслити члени речення...
решить задачу по геометрии 10 класс. N 319 - если, что текст на белорусском!...
Тарихи сөзді тап A) Тотыдайын C) Адырна Д) Арғыма...
Биология 7 класс Латюшин лабораторная работа много балов ...
решить самостоятельную работу...
Нужно приклад и столбиком...
Полный доступ к 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