Укажите значения переменной а, при которых получается верное неравенство.

var  n : integer; beginreadln (n); case n of1, 2, 12 : writeln ('зима'); 3, 4, 5 : writeln ('весна'); 6, 7, 8 : writeln ('лето'); 9, 10, 11 : writeln ('осень'); end; end.

поправьте меня если ^ это не указатель стпени, но если это степень то вот просто:

var a,x: extended; n,i: longint; begin    read(x);     read(n);     a: =1;     for i: =1 to n do        a: =a*x;     writeln(a: 0: 0); end.

векторная графика масштабируется без потери качества изображения, но в растровой графике возможно использование более богатой цвтовой палитры.

  256 цветов = 8 бит/пикс = 1 байт/пикс, 300*200=60000 пикс - общий размер изображения, 4 цвета - 2 бита/пикс, 60000*2=120000 бит - объём видеопамяти, 120000=15000 байт, значит максимально допустимый размер изображения равен 15000 байт, если палитра будет 256 цветов, то размер изображения будет 15000 пикселей, 15000=100х150, значит ответ: 100х150