4 цвета, значит, 2 бита на пиксель.
Пикселей 50*50 = 2500;
2500*2 бита = 5000 бит;
В байте 8 бит, => 5000/8 = 625 байт.
ВСЁ!
Var
a, b, c: real;
function IsBetween(x, a, b: real): boolean;
var
t: real;
begin
if a < b then
begin
t := a;
a := b;
b := t;
end;
IsBetween := (a >= b) and (a >= x) and (x >= b);
end;
begin
Readln(a, b, c); // не вводить одинаковых!
Write('Среднее число №');
if IsBetween(a, b, c) then writeln(1);
if IsBetween(b, a, c) then writeln(2);
if IsBetween(c, b, a) then writeln(3);
end.
Какие команды присваивания составлены правильно?
а) А:=В (верно для Pascal, Delphi)
б) А=В (верно для многих языков программирования, но не всех)
в) А=В+1 (верно для многих языков программирования, но не всех)
г) А+1:=А (не верно)
2. Сколько промежуточных переменных потребуется для того,чтобы переменной А было присвоено значение переменной В, переменной В- значение переменной С, а переменной С- значение переменной А? Запишите соответствующий алгоритм на алгоритмической языке.
t := C
C := A
A := B
B := t
Одна дополнительная переменная
Python:
n=input("N=")
a=1
for x in xrange(1, n+1):
a*=x
<span>print a
Pascal:
program z1;
var
a, i: integer;
b:longint;
begin
readln(a);
b:=1;
for i:=1 to a do
b:=b*i;
writeln('b=', b);
<span> end.</span></span>