Объясните программу в паскале, var a,b:integer; begin a:=2; b:=0; while a 10 do begin...

0 голосов
68 просмотров

Объясните программу в паскале, 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


Информатика (20 баллов) | 68 просмотров
Дан 1 ответ
0 голосов

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

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

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

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

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

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

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

(359 баллов)