Что будет напечатано после выполнения следующего фрагмента программы:
a:=4;
s:=0;
while a>0 do
begin
a:= a - 1;
s:= s + 10;
end;
write ( s );