во 2 степени)*in x + 1 - это табулируемая функция. пределы изменения x - [ 1; 3 ] шаг в цикле - 0.125 используемый оператор цикла - for

1)
var x:integer;
begin
read (x);
if (x=12) or (x=1) or (x=2) then writeln ('Зима');
 if (x=3) or (x=4) or (x=5) then writeln ('Весна'); 
 if (x=6) or (x=7) or (x=8) then writeln ('Лето'); 
 if (x=9) or (x=10) or (x=11) then writeln ('Осень'); 
end.
2)
var K,a:integer;
begin
readln(K);
a:=K mod 10;
if (K=11) or(K=12) or (K=13) or (K=14) then writeln ('У меня ',K,' друзей') else
begin
if (a=1) then writeln ('У меня ',K,' друг');
if (a=0) or ((a>=5) and (a<=9)) then writeln ('У меня ',K,' друзей');
if (a>=2) and (a<=4) then writeln ('У меня ',K,' друга');
end;
end.

Снимать «домашнее кино» хотят и любят все, но при этом слова «видеоредактор и видеомонтаж» многих приводят в уныние и вызывают даже некоторый трепет, как перед чем-то сложным и трудным.

Однако давайте вспомним совсем недалекое когда любительское кино снималось на пленку. Видеомонтаж в те годы состоял исключительно из разрезания, вырезания и склеивания кусков пленки. И следует заметить, получались весьма неплохие короткометражки. Единственно, о чем приходилось мечтать, - это о технической коррекции фильма, так как яркость, контраст, цветовой баланс и кадрирование можно было изменить только во время съёмки, задавая