Question

Какое значение примет переменная Y после выполнения программы?

var y,x: integer;

begin y:=0; x:=32;

while x>0 do

begin

x:=x-2; y:=y+0,1*x;

end;

writeln ('y=',y);

end.

Answer 1

Ответ:

x=32-2=30

y=0+0.1*30=3

Объяснение: