3. Запишите каждое высказывание с букв и знаков логических операций:
1) 12 декабря отмечают День Конституции РФ или День народного единства.
2) Число семнадцать нечётное и составное.
3) Во время летних каникул все отдыхают и не ходят в школу.​

k= 2 в степени а

a=глубина цвета

m=количество точек по горизонтали

n=количество точек по вертикали

k=количество цветов

v=объём видеопамяти

k=16 777 216   =2 в 24 степени

a=24

v  =  m  ×  n  ×  a 

v=(1024×768×24)/(8×1024×1024)=2,25 мб

№1

program z1;

var n: integer;

begin

write ('введите число n: ');

readln(n);

if (n mod 2 = 0) and (n div 100 < 1) and (n > 9) then write('данное число является четным двузначным') else if  (n div 100 < 1) and (n > 9) then write ('данное число не четное двузначное');

end.

№2

program z2;

var a, b, c, k: integer;

begin

k: =0;

writeln ('введите числа a, b и c: ');

readln(a,b,c);

if a< 0 then k: =k+1;

if b< 0 then k: =k+1;

if c< 0 then k: =k+1;

write('количество отрицательных чисел: ',k)

end.

смотря какую.у меня друг делал презинтацию на конкурс совёно он распрашивал всех на каком море кому нравиться потом сделал анкету типо :

на красном море допустим 45%

на чёрном море 15%

ну и т.д. 

var x: array[1..10] of real; n: integer; begin  for n: =1 to 10 do begin    x[n]: =power(3,n)-5;     writeln(x[n]);     end; end.

вот программа.