Question

Определите значение переменной спосле выполнения следующего фрагмента программы:
a:= 30;
b:= 6;
a:= a * 3 / b;
if a > b then
с:= 2*a - 5*(b+2)
else
с:= 2*a + 5*(b+2);

Answer 1

A:= 30;
a:=30;
b:= 6;
a:=30*3/6 после этого a примет значение a:=15, подставляем в условие
if 15>6 then (если условие выполняется), а оно выполняется, то решаем первое уравнение
c:= 2*15-5* (6+2) получаем
c:=-10
если писать на паскале, то будет так
var a,b,c:real;
begina:= 30;b:= 6;
a:= a * 3 / b;if a > b then
c:= 2*a - 5*(b+2)else
c:= 2*a + 5*(b+2);
writeln (c);
end.