1.
var x: integer;
begin
randomize;
x := random(9000) + 1000;
x := x - x mod 10;
writeln(x);
end.
2.
var x, _sum: integer;
begin
randomize;
_sum := 0;
x := random(9000) + 1000;
x := x - x mod 10;
writeln('Случайное число:', x);
while x > 0 do
begin
_sum := _sum + x mod 10;
x := x div 10;
end;
if _sum mod 3 = 0 then
writeln('Сумма цифр кратна трём!')
else
writeln('Сумма цифр не кратна трём!');
end.
3.
var x, _sum: integer;
begin
randomize;
_sum := 0;
x := random(9000) + 1000;
writeln('Случайное число: ', x);
write('Если записать его в обратном порядке: ');
while x > 0 do
begin
write(x mod 10);
x := x div 10;
end;
end.
--- Python 3.8.3 ---
#1 - file mdir.py
import os
import sys
import difflib
__all__ = ['CreateEmptyDir', 'RmDir']
__here__ = os.path.dirname(os.path.realpath(__file__))
#Функция, создающая папки
def CreateEmptyDir(count, path = __here__):
try:
for i in range(count):
rpath = path + f'\\dir_{i}'
os.mkdir(rpath)
except OSError:
print(f'Failed to create directory {path}')
#Функция, удаляющая папки
def RmDir(mask, path = __here__):
try:
for folder in os.listdir(path):
s = difflib.SequenceMatcher(None, mask, folder)
if s.ratio() > 0.8:
f = path + '\\' + folder
if os.path.isdir(f):
os.rmdir(f)
except OSError as e:
print(f'Failed to remove directory {f}\n{e}')
#Вызов функций из модуля
def main():
CreateEmptyDir(10)
next = input()
RmDir('dir_')
if __name__ == "__main__":
main()
#2 - file randchoise.py
import random
__all__ = ['RandChoise']
def RandChoise(lst):
if len(lst) == 0: return None
return random.choice(lst)
def main():
data = [1,2,3,4]
print(RandChoise(data))
if __name__ == "__main__":
main()
#3 main.py
from mdir import *
from randchoise import *
import time
def main():
CreateEmptyDir(10)
time.sleep(3) #Что бы успели прогрузиться созданные папки
RmDir('dir_')
print(RandChoise([1,2,3,4,5,6,7,8,9,2,1,32,31,2540]))
if __name__ == "__main__":
main()
8 КБайт
Объяснение:
Количество пикселей:
Если кодируется 4 битами то размер:
бит
Переведем в Байты (1 Байт = 8 бит):
Переведем к КБайты (1КБ = 1024 Б):
Если кодируется 2 битами то размер:
бит
Переведем в Байты (1 Байт = 8 бит):
Переведем к КБайты (1КБ = 1024 Б):
Находим разницу:
Кбайт
============
Не забывайте нажать " ", поставить оценку и, если ответ удовлетворил, то выберите его как "Лучший"
Бодрого настроения и добра!
Успехов в учебе