Задание 2. Создайте алгоритм и программу для вычисления значения функции F по формулам:
3a^3-1 при a<-3
3a^2-2 при a>5
A^2-2a+3 при -3<=a<=5

Паскаль.

uses crt;var f,a:integer;beginwrite('Введите а: ');readln(a);if a<-3 thenf:=3*(a*a*a)-1;if a>5 thenf:=3*sqr(a)-1;if ((-3<=a) and (a<=5)) then f:=sqr(a)-(2*a)+3;writeln('f= ',f);end.

var  a,F:integer;begin  Write('Введите a: '); Read(a);  if a<-3 then F:=3*a*sqr(a)-1  else    if a>5 then F:=3*sqr(a)-2    else F:=sqr(a)-2*a+3;  Writeln('F=',F)end.