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.