1.Определите в битах глубину кодирования каждого цвета палитры, состоящей из 24 цветов. В ответе запишите только число, наименование единицы измерения записывать не нужно.2.Первоначально рисунок, выполненный в палитре, состоящей из 16 цветов, имел размерность 128 х 128. Пользователь изменил размерность рисунка и она стала 256 х 128. А потом пользователь сменил палитру, и в ней стало 32 цвета. Во сколько раз изменился размер видеопамяти, необходимый для отображения этого рисунка? В ответе напишите только число, никаких других символов писать в ответе не надо.3.Посмотрите на приведенный рисунок. Это монохромный рисунок: для его выполнения использовали всего два цвета (белый и черный Размер этого рисунка 128 х 128 пикселей. Определите объем видеопамяти в Кбайтах необходимый и достаточный (т.е. минимальный) для хранения этого рисунка. В ответе запишите только число, наименование единицы измерения записывать не нужно. Решите всё Буду очень благодарен .
Ответы
Vara,b,c,d,x1,x2: real;
begin
writeln('Дано уравнение вида ax^2+bx+c=0');
Writeln ('Укажи переменную "a"');
readln(a);
Writeln ('Укажи переменную "b"');
readln(b);
Writeln ('Укажи переменную "c"');
readln(c);
if a = 0
then writeln('Не квадратное уравнение!')
else begin
d:= sqr(b)-4*a*c;
if d < 0 then writeln('Нет корней')
else begin
x1:= (-b+sqrt(d))/2*a;
x2:= (-b-sqrt(d))/2*a;
writeln ('X1 =',x1,' X2 =',x2);
end;
end;
end.
begin
writeln('Дано уравнение вида ax^2+bx+c=0');
Writeln ('Укажи переменную "a"');
readln(a);
Writeln ('Укажи переменную "b"');
readln(b);
Writeln ('Укажи переменную "c"');
readln(c);
if a = 0
then writeln('Не квадратное уравнение!')
else begin
d:= sqr(b)-4*a*c;
if d < 0 then writeln('Нет корней')
else begin
x1:= (-b+sqrt(d))/2*a;
x2:= (-b-sqrt(d))/2*a;
writeln ('X1 =',x1,' X2 =',x2);
end;
end;
end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Как называются люди которые первыми проходят игру и описывают заранее .
Автор: cat2572066
Какие существуют редактирования документа
Автор: Станиславович1830
Напишите в PascalABC домик на фоне голубого неба с солнцем (8 класс)
Автор: Donat-Evgeniya793
Чи підсилюють роботу один одного декілька антивірусів?
Автор: bogdanyukn562
В целях удовлетворения этих потребностей органы государственной власти и органы местного и регионального самоуправления создают информационные службы, системы, сети, базы и банки данных.
Порядок их создания, структура, права и обязанности определяются Кабинетом Министров Украины или другими органами государственной власти, а также органами местного и регионального самоуправления.