Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
я бы сделал
program p_1; var a,b: real; beginwriteln ('vvedite 1-oe'); read (a); writeln ('vvedite 2-oe'); read (b); if (a> b) thenbegin writeln ( ' 1-oe bolshe (',a,')' ); end; if (a< b) thenbegin writeln ( ' 1-oe menshee. bolshe vtoroe (',b,')' ); end; if a=b thenbegin writeln ('oni ravni'); end; end.
1)false (т.к. x> y)
2)true (x< y,x не равен y)
3)false(x> y)
4)true(т.к. x=y, x не равен y)
var
b1,b2,i,n,p: integer;
begin
write('введите n'); readln (n); b1: =5; writeln ('1 элемент = ', b1);
p: =-1;
for i: =2 to n do
p: =p*(-1);
b2: =p*b1-8;
writeln (i,' элемент = ', b2);
b1: =b2;
end;
end.
350*200 = 700000 точек используется в изображении
1 бит 2 цвета4 бита 16 цветов8 бит 256 цветов16 бит 65 000 цветов24 бит 16,7 миллионов цветов.
теперь считай, сколько битов ты выделяешь на точку1 бит = 0.125 байта24 бита = 3 байта
Популярные вопросы