Var
a,b,x,y,z:integer;
begin
writeln('Введите первое число');
readln(a);
writeln('Введите второе число');
readln(b);
z:=b;
if b<0 then z:=-b;
for y:=1 to z do begin
x:=x+a;
end;
if b<0 then x:=-x;
writeln('Произведение чисел = ',x);
end.
Проверка по входным данным на фото
Ответ: сообщение состоит из 20 символов, то есть из 20 байтов, потому что 1 символ - 8 бит,а 8 бит-1 байт.
1)
N = 8
array = [random.randint(0,10) for i in range(N)]
print(array)
array = [i * i for i in array]
print(array)
2)
N = 10
array = [random.randint(100,300) for i in range(N)]
print(array)
array = [i//10%10 for i in array]
print(array)
3)
N = 10
sum = 0
arr_sum = []
array = [str(random.randint(100,500)) for i in range(N)]
print(array)
for j in array:
for i in j:
sum += int(i)
arr_sum.append(sum)
sum = 0
print(arr_sum)
Задание 1
1)
1024*768=786432 пикселей всего<span>
</span>2) 32=2^5 => 5 бит - 1 пиксель<span>
<span>3)
786432*5=3932160 бит = 491520 байт = 480 Кбайт
Задание 2
1) 120*150=18000
2) 2=2^1 => 1 бит - 1 пиксель
3) 18000*1=18000 бит = 22500 байт</span></span>
Всё просто. До из суммы вычитается загаданное число. Возьмите число 0 и сами всё поймёте