Question

Объясните программу в паскале,

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.

в частности эту строчку - while a <> 10 do

Answer 1

Объявляются 2 переменные - a,b типом integer(целочисленный тип)

переменной a присваивается значение два

переменной b присваивается значение нуль

Начинается цикл while с условием работы пока "a" не равняется 10(то есть будет работать пока "a" не 10)

в теле цикла "a" добавляется к уже существующему значению двойку

также считается "b" которой присваивается сумма уже существующей b и a умноженное на 3

После цикла выводится полученное значение b которое равно 84