f=x+a,4<x<7
   x-a,10<x<12
   x*a<ост случаи
pascal abc

Помогите пожалуйста с информатикой, завтра экзамен:a1.https://znanija.com/task/29332994 Помогите по информатика. Решите номер 3. Есть вложение . 20 баллов.a2.https://znanija.com/task/29332995a3.https://znanija.com/task/29332997a4.https://znanija.com/task/29333001a5.https://znanija.com/task/29333004a6.https://znanija.com/task/29333008a7.https://znanija.com/task/29333010a8.https://znanija.com/task/29333012a9.https://znanija.com/task/29333016a10.https://znanija.com/task/29333017

a11.https://znanija.com/task/29333020a12.https://znanija.com/task/29333023a13.https://znanija.com/task/29333026a14.https://znanija.com/task/29333028a15. https://znanija.com/task/29333030a16.https://znanija.com/task/29333032b1.https://znanija.com/task/29333036b2.https://znanija.com/task/29333048b3.https://znanija.com/task/29333048b4.https://znanija.com/task/29333051b5.https://znanija.com/task/29333054b6.https://znanija.com/task/29333058b7.https://znanija.com/task/29333058

b7.https://znanija.com/task/29333058b8.https://znanija.com/task/29333059b9.https://znanija.com/task/29333062b11.https://znanija.com/task/29333066b12.https://znanija.com/task/29333068b14.https://znanija.com/task/29333071b15.https://znanija.com/task/29333073b16.https://znanija.com/task/29333078b17.https://znanija.com/task/29333088b18.https://znanija.com/task/29333082b19.https://znanija.com/task/2933308320 баллов за каждое .Заранее благодарен!

Ага. 4 десятка заданий. Щас.

var  a,x,f:integer;begin  Write('x=');  Readln(x);  Write('a=');  Readln(a);  if (x>4) and (x<7) then f:=x+a  else if (x>10) and (x<12) then f:=x-a  else f:=x*a;  Writeln('f=',f)end.