паскаль var a, b:integer begin a:=2; b:=0; while a(ромб) 10 do begin a:=a+2; b:=b+3*a; end; write (b); end
что будет в результате?

p.s. то, что вы назвали ромбом, означает неравенство

В результате работы программы будет выведено значение переменной bВычислим конечное значение bВсего цикл совершит 4 итерацииа = 2b = 01: а = 2 + 2 = 4   b = 0 + 4 * 3 = 122: a = 4 + 2 = 6   b = 12 + 6 * 3 = 303: a = 6 + 2 = 8   b = 30 + 8 * 3 = 544: a = 8 + 2 = 10   b = 54 + 10 * 3 = 84Ответ: b = 84

В результате выполнения программы на экран будет выведено число: 84