F=x+a,4 x-a,10 x*a<ост случаи<br>pascal abc
Var a,x,f:integer; begin Write('x='); Readln(x); Write('a='); Readln(a); if (x>4) and (x<7) then f:=x+a<br> else if (x>10) and (x<12) then f:=x-a<br> else f:=x*a; Writeln('f=',f) end.
Помогите пожалуйста с информатикой, завтра экзамен:a1.https://znanija.com/task/29332994 Помогите по информатика. Решите номер 3. Есть вложение . 20 баллов. a2.https://znanija.com/task/29332995 a3.https://znanija.com/task/29332997 a4.https://znanija.com/task/29333001 a5.https://znanija.com/task/29333004 a6.https://znanija.com/task/29333008 a7.https://znanija.com/task/29333010 a8.https://znanija.com/task/29333012 a9.https://znanija.com/task/29333016 a10.https://znanija.com/task/29333017
a11.https://znanija.com/task/29333020 a12.https://znanija.com/task/29333023 a13.https://znanija.com/task/29333026 a14.https://znanija.com/task/29333028 a15. https://znanija.com/task/29333030 a16.https://znanija.com/task/29333032 b1.https://znanija.com/task/29333036 b2.https://znanija.com/task/29333048 b3.https://znanija.com/task/29333048 b4.https://znanija.com/task/29333051 b5.https://znanija.com/task/29333054 b6.https://znanija.com/task/29333058 b7.https://znanija.com/task/29333058
b7.https://znanija.com/task/29333058 b8.https://znanija.com/task/29333059 b9.https://znanija.com/task/29333062 b11.https://znanija.com/task/29333066 b12.https://znanija.com/task/29333068 b14.https://znanija.com/task/29333071 b15.https://znanija.com/task/29333073 b16.https://znanija.com/task/29333078 b17.https://znanija.com/task/29333088 b18.https://znanija.com/task/29333082 b19.https://znanija.com/task/29333083 20 баллов за каждое .Заранее благодарен!