V=A(длина)*B(ширина)*b(битовая глубина)
V=800*600*24=1440000байт
1440000*4=5625Кбайт
Ответ:
13
Объяснение:
Смотри , начинаем с точки А идем в точку Б .В точку Б идет одна стрелка из точки А смотрим идет 1 дорога значит и точка Б останется 1 .
потом идем в точку В идут 2 стрелки из точки А и точки В то есть в Б было 1 и в А.Итого 1+1=2 и т.д
Если хочешь по подробнее могу скинуть видео по которому я сама готовилась 2 года назад.
<span>a,b:integer;
d:string[45];
begin
SetConsoleOutputCP(1251);
writeln('Введите число в диапазоне от 1 дo 100');
write('a=');
readln(a);
b:=a mod 10;
a:=a div 10;
case b of
0: d:='';
1: d:='I';
2: d:='II';
3: d:='III';
4: d:='IV';
5: d:='V';
6: d:='VI';
7: d:='VII';
8: d:='VIII';
9: d:='IX';
end;
b:=a mod 10;
a:=a div 10;
case b of
0: d:=''+d;
1: d:='X'+d;
2: d:='XX'+d;
3: d:='XXX'+d;
4: d:='XL'+d;
5: d:='L'+d;
6: d:='LX'+d;
7: d:='LXX'+d;
8: d:='LXXX'+d;
9: d:='XC'+d;
end;
b:=a mod 10;
a:= a div 10;
case b of
0: d:=''+d;
1: d:='C'+d;
end;
writeln('B Римской системе счисления ' ,d);
readln;
end.</span><span> </span>
var a:array[1..2,1..30] of integer;
i,j:integer;
Begin
for i:= 1 to 30 do begin
writeln('Введите номер ученика:');
read(a[1,i]);
writeln('Введите оценку:');
read(a[2,i]);
end;
for i:= 1 to 10 do begin
writeln(i:2,' - ');
for j:= 1 to 30
if a[1,j]=i then
write(a[2,i],' ');
end;
readkey;
End.
Ответ:
вычисление A в степени n
Объяснение:
выполняется цикл n раз
в теле цикла число A умножается само на себя
