Определи какое значение будет выведено на экран монитора после выполнения программы. program summer;var a, b: integer;begin а := 20;b := 3;b := a/2*b;a := 2*а + 3*b; В ответе должно быть одно число

ответ:130

Объяснение:

b=20/2*3=30

a=2*20+3*30=130

линейный (следования)

разветвляющийся (развилка)

циклический

пусть [a,b] - область и a< =b

var

a,b,x: real;

begin

readln(a,b,x);

if (a< =x) and (x< =b) then

writeln('принадлежит')

else

writeln('не принадлежит');

end.