Program task;
var a,b,c,d,n,s:longint;
begin
writeln('vvedite chislo 4-значноe chislo');read(a);
b:= a div 1000;
c:= a div 100 mod 10;
d:= a div 10 mod 10 ;
n:= a mod 10;
writeln('n=',n);
writeln('b=',b);
writeln('c=',c);
writeln('d=',d);
writeln('s=',b+c+d+n);
end.
Ответ:в 1 ответами являются номера 1 и 4 , а в 2 скрине
2 номер
Объяснение:Я так решил, надеюсь правельно
1. Определим, сколько всего пикселей содержит изображение.
1024×1024 = 2¹⁰×2¹⁰ = 2²⁰
2. Определим, сколько байт (и бит) приходится на цветность
2 Мб / 2²⁰ = 2×2²⁰ / 2²⁰ = 2 байта = 2×8 = 16 бит.
Ответ: 16 бит
Var
a,x,b,rez:integer;
Begin
readln(a,x,b);
rez:= (a*x)-b;
writeln(rez);
End.