Ввести арифметическое выражение c тремя числами, в котором можно использовать сложение и вычитание. Вычислить это выражение.

program arifmetika;var a,b,c,summa:Integer;beginwrite('Введите число а');readln(a);write('Введите число b');readln(b);write('Введите число с');readln(c);summa:=(a+b)-c;write('арифметическое выражение c тремя числами=',summa);end.

Это самая простая программа. Делал через паскаль

Var y,x,alpfa1,alpfa2,beta,l:real; t1,t2:real;Beginreadln(x,alpfa1,alpfa2,beta,l); t1:=sqr(x)+sqr(alpfa1); t2:=sqr(x)*x*(beta-alpfa2)-sqr(cos(l+2))*cos(l+2); if (t1=0)or (t2<0) then write('y не определено') else begin y:=t1*t2; writeln('y=',y:0:2); end;readln;End.

не знаю можнт так