Сергеевич
?>

Для хранения растрового изображения размером 270×270 пикселей отвели 32 КБ памяти. Каково максимально возможное число цветов в палитре изображения не могу решить

Информатика

Ответы

мурувватовна викторович569

program one;


type TIntMassiv = array of real;


var a,b,c,x,y: TIntMassiv; n,i:integer;


begin


writeln('Введите длину массивов(n)');


readln(n);


setLength(a,n); // Создаем динамические массивы длины n


setLength(b,n);


setLength(c,n);


setLength(x,n);


setLength(y,n);


for i := 0  to n-1 do  

 begin


  writeln('Введите ',i+1, ' массива a');


  readln(a[i]);  

  writeln('Введите ',i+1, ' массива b');


  readln(b[i]);  

  writeln('Введите ',i+1, ' массива c');


  readln(c[i]);


 end;


for i := 0 to n-1 do


 begin


  x[i] :=  MIN(a[i],b[i]) / 2;


  y[i] :=  MIN(a[i],c[i]) / 2;


 end;


for i := 0 to n-1 do


 begin


  writeln('x[',i,']=',x[i]);


  writeln('y[',i,']=',y[i]);


 end;


a := nil; //Освобождаем память


c := nil;


b := nil;


x := nil;


y := nil;


end.

doorhan42n6868

ЗАДАНИЕ 1:

#include <iostream>

using namespace std;

void main()

{

   int number = 0;

   cout << "Введите число ->";

   cin >> number;

   if (number % 2 == 0)

   {

       number *= 3;

   }

   else

   {

       number /= 2;

   }

   cout << number << endl;

}


ЗАДАНИЕ 2:

#include <iostream>

#include <cctype>

using namespace std;

void main()

{

   char symbol = 0;

   cout << "Введите символ ->";

   cin >> symbol;

   if (isalpha(symbol))

   {

       cout << "Вы ввели букву" << endl;

   }

   else if (isdigit(symbol))

   {

       cout << "Вы ввели цифру" << endl;

   }

   else if (ispunct(symbol))

   {

       cout << "Вы ввели знак препинания" << endl;

   }

   else

   {

       cout << "Вы ввели не букву, не цифру и не знак препинания" << endl;

   }

}

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Для хранения растрового изображения размером 270×270 пикселей отвели 32 КБ памяти. Каково максимально возможное число цветов в палитре изображения не могу решить
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

jaksonj326
alex091177443
aci2003
Nikolai710
lor005148
merzlikinairena
puchkovajulia
svetarakityanskaya
Blekjek730
mail5
gumirovane2294
Акимцева27
nunabat457
Bogataya Vladimir318
alexseyzyablov