Помогите пожалуйста все, что сможете буду очень благодарна!!!!!!!!!! 25 баллов! СРОЧНО!!!!!!!!!!

А ты?

Чувашия. Просто валюта приблизительно одинакова у вас тенге а у нас тенке

уровень b надо решать?

lf gj;fkeqcnf

Да пожалуйста

спасибо

добавил уровень с

спасибо

Уровень A1var x,y:real;beginReadln(X); If x>5 then y:=(sqrt(x-5))/(2*x) else y:=(abs(x*x*x-10))/(2*x*x+1);Writeln(y);end.-5 2.64705882352941-2 20 105 2.2549019607843112 0.1102396379610252var a,b:integer;beginReadln(a,b);Writeln(max(a,b));Writeln(max(a,b)-min(a,b));end.

УРОВЕНЬ В№1vari:integer;beginreadln(i);if i mod 2 =0 thenwriteln('число ',i,' четное')elsewriteln('число ',i,' нечетное');end.№2varx,y:real;beginreadln(x);if x<=0 theny:=(abs(x-10)+x*x*x)/(3*x-5)elsey:=(sqrt(x+4))/(2*x+7);writeln(y);end.УРОВЕНЬ С№1varr,a:real;beginreadln(r,a);if r*2=a thenwriteln('окружность можно вписать')elsewriteln('окружность нельзя вписать');end.№2varx,y:real;beginreadln(x);if (x>=-5) and (x<10) theny:=(sqrt(x*x+4*x-5))/(2*x+7)elsey:=(abs(x-100)+x*x*x)/(3*x+7);writeln(y);end.